diff options
Diffstat (limited to 'gcc/ada/a-wtinio.ads')
| -rw-r--r-- | gcc/ada/a-wtinio.ads | 26 |
1 files changed, 13 insertions, 13 deletions
diff --git a/gcc/ada/a-wtinio.ads b/gcc/ada/a-wtinio.ads index 0c9c0642121..257ba23ac96 100644 --- a/gcc/ada/a-wtinio.ads +++ b/gcc/ada/a-wtinio.ads @@ -28,33 +28,33 @@ package Ada.Wide_Text_IO.Integer_IO is Default_Base : Number_Base := 10; procedure Get - (File : in File_Type; + (File : File_Type; Item : out Num; - Width : in Field := 0); + Width : Field := 0); procedure Get (Item : out Num; - Width : in Field := 0); + Width : Field := 0); procedure Put - (File : in File_Type; - Item : in Num; - Width : in Field := Default_Width; - Base : in Number_Base := Default_Base); + (File : File_Type; + Item : Num; + Width : Field := Default_Width; + Base : Number_Base := Default_Base); procedure Put - (Item : in Num; - Width : in Field := Default_Width; - Base : in Number_Base := Default_Base); + (Item : Num; + Width : Field := Default_Width; + Base : Number_Base := Default_Base); procedure Get - (From : in Wide_String; + (From : Wide_String; Item : out Num; Last : out Positive); procedure Put (To : out Wide_String; - Item : in Num; - Base : in Number_Base := Default_Base); + Item : Num; + Base : Number_Base := Default_Base); end Ada.Wide_Text_IO.Integer_IO; |