CVS difference for ai05s/ai05-0159-1.txt
--- ai05s/ai05-0159-1.txt 2011/08/17 00:24:12 1.19
+++ ai05s/ai05-0159-1.txt 2012/01/27 23:23:11 1.20
@@ -111,7 +111,7 @@
with Ada.Containers.Synchronized_Queue_Interfaces;
generic
with package Queue_Interfaces is new Ada.Containers.Synchronized_Queue_Interfaces (<>);
- Default_Ceiling: System.Any_Priority := System.Priority'Last;
+ Default_Ceiling : System.Any_Priority := System.Priority'Last;
package Ada.Containers.Unbounded_Synchronized_Queues is
pragma Preelaborate(Unbounded_Synchronized_Queues);
@@ -163,7 +163,7 @@
generic
with package Queue_Interfaces is new Ada.Containers.Synchronized_Queue_Interfaces (<>);
Default_Capacity : Count_Type;
- Default_Ceiling: System.Any_Priority := System.Priority'Last;
+ Default_Ceiling : System.Any_Priority := System.Priority'Last;
package Ada.Containers.Bounded_Synchronized_Queues is
pragma Preelaborate(Bounded_Synchronized_Queues);
@@ -224,10 +224,10 @@
with package Queue_Interfaces is new Ada.Containers.Synchronized_Queue_Interfaces (<>);
type Queue_Priority is private;
with function Get_Priority
- (Element: Queue_Interfaces.Element_Type) return Queue_Priority is <>;
+ (Element : Queue_Interfaces.Element_Type) return Queue_Priority is <>;
with function Before
(Left, Right : Queue_Priority) return Boolean is <>;
- Default_Ceiling: System.Any_Priority := System.Priority'Last;
+ Default_Ceiling : System.Any_Priority := System.Priority'Last;
package Ada.Containers.Unbounded_Priority_Queues is
pragma Preelaborate(Unbounded_Priority_Queues);
@@ -309,7 +309,7 @@
with function Before
(Left, Right : Queue_Priority) return Boolean is <>;
Default_Capacity : Count_Type;
- Default_Ceiling: System.Any_Priority := System.Priority'Last;
+ Default_Ceiling : System.Any_Priority := System.Priority'Last;
package Ada.Containers.Bounded_Priority_Queues is
pragma Preelaborate(Bounded_Priority_Queues);
@@ -562,7 +562,7 @@
@b<with> Ada.Containers.Synchronized_Queue_Interfaces;
@b<generic>
@b<with package> Queue_Interfaces @b<is new> Ada.Containers.Synchronized_Queue_Interfaces (<@>);
- Default_Ceiling: System.Any_Priority := System.Priority'Last;
+ Default_Ceiling : System.Any_Priority := System.Priority'Last;
@b<package> Ada.Containers.Unbounded_Synchronized_Queues @b<is>
@b<pragma> Preelaborate(Unbounded_Synchronized_Queues);
@@ -576,9 +576,9 @@
@b<new> Queue_Interfaces.Queue @b<with>
@b<overriding>
- @b<entry> Enqueue (New_Item: @b<in> Queue_Interfaces.Element_Type);
+ @b<entry> Enqueue (New_Item : @b<in> Queue_Interfaces.Element_Type);
@b<overriding>
- @b<entry> Dequeue (Element: @b<out> Queue_Interfaces.Element_Type);
+ @b<entry> Dequeue (Element : @b<out> Queue_Interfaces.Element_Type);
@b<overriding>
@b<function> Current_Use @b<return> Count_Type;
@@ -614,7 +614,7 @@
@b<generic>
@b<with package> Queue_Interfaces @b<is new> Ada.Containers.Synchronized_Queue_Interfaces (<@>);
Default_Capacity : Count_Type;
- Default_Ceiling: System.Any_Priority := System.Priority'Last;
+ Default_Ceiling : System.Any_Priority := System.Priority'Last;
@b<package> Ada.Containers.Bounded_Synchronized_Queues @b<is>
@b<pragma> Preelaborate(Bounded_Synchronized_Queues);
@@ -629,9 +629,9 @@
@b<new> Queue_Interfaces.Queue @b<with>
@b<overriding>
- @b<entry> Enqueue (New_Item: @b<in> Queue_Interfaces.Element_Type);
+ @b<entry> Enqueue (New_Item : @b<in> Queue_Interfaces.Element_Type);
@b<overriding>
- @b<entry> Dequeue (Element: @b<out> Queue_Interfaces.Element_Type);
+ @b<entry> Dequeue (Element : @b<out> Queue_Interfaces.Element_Type);
@b<overriding>
@b<function> Current_Use @b<return> Count_Type;
@@ -675,10 +675,10 @@
@b<with package> Queue_Interfaces @b<is new> Ada.Containers.Synchronized_Queue_Interfaces (<@>);
type Queue_Priority is @b<private>;
@b<with function> Get_Priority
- (Element: Queue_Interfaces.Element_Type) @b<return> Queue_Priority is <@>;
+ (Element : Queue_Interfaces.Element_Type) @b<return> Queue_Priority is <@>;
@b<with> @b<function> Before
(Left, Right : Queue_Priority) @b<return> Boolean @b<is> <@>;
- Default_Ceiling: System.Any_Priority := System.Priority'Last;
+ Default_Ceiling : System.Any_Priority := System.Priority'Last;
@b<package> Ada.Containers.Unbounded_Priority_Queues @b<is>
@b<pragma> Preelaborate(Unbounded_Priority_Queues);
@@ -692,9 +692,9 @@
@b<new> Queue_Interfaces.Queue @b<with>
@b<overriding>
- @b<entry> Enqueue (New_Item: @b<in> Queue_Interfaces.Element_Type);
+ @b<entry> Enqueue (New_Item : @b<in> Queue_Interfaces.Element_Type);
@b<overriding>
- @b<entry> Dequeue (Element: @b<out> Queue_Interfaces.Element_Type);
+ @b<entry> Dequeue (Element : @b<out> Queue_Interfaces.Element_Type);
@b<not overriding>
@b<entry> Dequeue_Only_High_Priority
@@ -760,7 +760,7 @@
@b<with function> Before
(Left, Right : Queue_Priority) @b<return> Boolean is <@>;
Default_Capacity : Count_Type;
- Default_Ceiling: System.Any_Priority := System.Priority'Last;
+ Default_Ceiling : System.Any_Priority := System.Priority'Last;
@b<package> Ada.Containers.Bounded_Priority_Queues @b<is>
@b<pragma> Preelaborate(Bounded_Priority_Queues);
@@ -781,9 +781,9 @@
@b<pragma> Priority(Ceiling);
@b<overriding>
- @b<entry> Enqueue (New_Item: @b<in> Queue_Interfaces.Element_Type);
+ @b<entry> Enqueue (New_Item : @b<in> Queue_Interfaces.Element_Type);
@b<overriding>
- @b<entry> Dequeue (Element: @b<out> Queue_Interfaces.Element_Type);
+ @b<entry> Dequeue (Element : @b<out> Queue_Interfaces.Element_Type);
@b<not overriding>
@b<entry> Dequeue_Only_High_Priority
Questions? Ask the ACAA Technical Agent