diff options
Diffstat (limited to 'gcc/ada/a-ztcoau.adb')
| -rw-r--r-- | gcc/ada/a-ztcoau.adb | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/gcc/ada/a-ztcoau.adb b/gcc/ada/a-ztcoau.adb index a1b966fb194..e0fd01a882c 100644 --- a/gcc/ada/a-ztcoau.adb +++ b/gcc/ada/a-ztcoau.adb @@ -1,6 +1,6 @@ ------------------------------------------------------------------------------ -- -- --- GNAT RUNTIME COMPONENTS -- +-- GNAT RUN-TIME COMPONENTS -- -- -- -- A D A . W I D E _ W I D E _ T E X T _ I O . C O M P L E X _ A U X -- -- -- @@ -194,7 +194,6 @@ package body Ada.Wide_Wide_Text_IO.Complex_Aux is To (To'Last) := ')'; - To (To'Last - Iptr .. To'Last - 1) := I_String (1 .. Iptr); for J in To'First + Rptr + 2 .. To'Last - Iptr - 1 loop |