diff options
Diffstat (limited to 'gcc/ada/a-wtedit.ads')
-rw-r--r-- | gcc/ada/a-wtedit.ads | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/a-wtedit.ads b/gcc/ada/a-wtedit.ads index f275f8052de..e0917f51678 100644 --- a/gcc/ada/a-wtedit.ads +++ b/gcc/ada/a-wtedit.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2005, Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2006, Free Software Foundation, Inc. -- -- -- -- This specification is derived from the Ada Reference Manual for use with -- -- GNAT. The copyright notice above, and the license provisions that follow -- @@ -47,8 +47,8 @@ package Ada.Wide_Text_IO.Editing is (Pic_String : String; Blank_When_Zero : Boolean := False) return Picture; - function Pic_String (Pic : in Picture) return String; - function Blank_When_Zero (Pic : in Picture) return Boolean; + function Pic_String (Pic : Picture) return String; + function Blank_When_Zero (Pic : Picture) return Boolean; Max_Picture_Length : constant := 64; @@ -194,6 +194,6 @@ private Radix_Point : Wide_Character) return Wide_String; -- Formats number according to Pic - function Expand (Picture : in String) return String; + function Expand (Picture : String) return String; end Ada.Wide_Text_IO.Editing; |