diff options
Diffstat (limited to 'gcc/ada/a-ztedit.ads')
| -rw-r--r-- | gcc/ada/a-ztedit.ads | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/a-ztedit.ads b/gcc/ada/a-ztedit.ads index 3a2f49a4d71..e72bba781a1 100644 --- a/gcc/ada/a-ztedit.ads +++ b/gcc/ada/a-ztedit.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_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; @@ -195,6 +195,6 @@ private Radix_Point : Wide_Wide_Character) return Wide_Wide_String; -- Formats number according to Pic - function Expand (Picture : in String) return String; + function Expand (Picture : String) return String; end Ada.Wide_Wide_Text_IO.Editing; |