diff options
Diffstat (limited to 'gcc/ada/a-cborse.ads')
| -rw-r--r-- | gcc/ada/a-cborse.ads | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/a-cborse.ads b/gcc/ada/a-cborse.ads index 0c8ae6b..9c4fdb4 100644 --- a/gcc/ada/a-cborse.ads +++ b/gcc/ada/a-cborse.ads @@ -31,9 +31,9 @@ -- This unit was originally developed by Matthew J Heaney. -- ------------------------------------------------------------------------------ -with Ada.Iterator_Interfaces; private with Ada.Containers.Red_Black_Trees; with Ada.Streams; use Ada.Streams; +with Ada.Iterator_Interfaces; generic type Element_Type is private; @@ -62,7 +62,7 @@ package Ada.Containers.Bounded_Ordered_Sets is No_Element : constant Cursor; function Has_Element (Position : Cursor) return Boolean; - package Ordered_Set_Iterator_Interfaces is new + package Set_Iterator_Interfaces is new Ada.Iterator_Interfaces (Cursor, Has_Element); type Constant_Reference_Type @@ -212,12 +212,12 @@ package Ada.Containers.Bounded_Ordered_Sets is function Iterate (Container : Set) - return Ordered_Set_Iterator_Interfaces.Reversible_Iterator'class; + return Set_Iterator_Interfaces.Reversible_Iterator'class; function Iterate (Container : Set; Start : Cursor) - return Ordered_Set_Iterator_Interfaces.Reversible_Iterator'class; + return Set_Iterator_Interfaces.Reversible_Iterator'class; generic type Key_Type (<>) is private; |