diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2004-10-27 14:29:19 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2004-10-27 14:29:19 +0200 |
| commit | 59705c38c69f6a622b9f53764de40d869f69bd3d (patch) | |
| tree | aec72522aad576890ca2fbf021ca73c85b4a4c8a /gcc/ada | |
| parent | 910a2e4d8c25017c00098043c52a0ad8662272c8 (diff) | |
| download | gcc-59705c38c69f6a622b9f53764de40d869f69bd3d.tar.gz | |
a-filico.ads, [...]: fix incorrect header.
* a-filico.ads, a-filico.adb: fix incorrect header.
* a-ststio.ads: Fix typo in identifier
* sem_ch4.adb: Minor reformatting.
From-SVN: r89644
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/a-filico.adb | 4 | ||||
| -rw-r--r-- | gcc/ada/a-filico.ads | 4 | ||||
| -rw-r--r-- | gcc/ada/a-ststio.ads | 4 | ||||
| -rw-r--r-- | gcc/ada/sem_ch4.adb | 2 |
4 files changed, 7 insertions, 7 deletions
diff --git a/gcc/ada/a-filico.adb b/gcc/ada/a-filico.adb index 7f953bff653..87272802d14 100644 --- a/gcc/ada/a-filico.adb +++ b/gcc/ada/a-filico.adb @@ -2,11 +2,11 @@ -- -- -- GNAT COMPILER COMPONENTS -- -- -- --- S Y S T E M . L I S T _ F I N A L I Z A T I O N -- +-- A D A . F I N A L I Z A T I O N . L I S T _ C O N T R O L L E R -- -- -- -- B o d y -- -- -- --- Copyright (C) 1992-2003 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2004 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- diff --git a/gcc/ada/a-filico.ads b/gcc/ada/a-filico.ads index 4263b260cd3..b3affda0456 100644 --- a/gcc/ada/a-filico.ads +++ b/gcc/ada/a-filico.ads @@ -4,9 +4,9 @@ -- -- -- A D A . F I N A L I Z A T I O N . L I S T _ C O N T R O L L E R -- -- -- --- B o d y -- +-- S p e c -- -- -- --- Copyright (C) 1992-1997 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-1997, 2004 Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- diff --git a/gcc/ada/a-ststio.ads b/gcc/ada/a-ststio.ads index 6a3ff556f08..11040face21 100644 --- a/gcc/ada/a-ststio.ads +++ b/gcc/ada/a-ststio.ads @@ -6,7 +6,7 @@ -- -- -- S p e c -- -- -- --- Copyright (C) 1992-2001 Free Software Foundation, Inc. -- +-- Copyright (C) 1992-2004 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 -- @@ -51,7 +51,7 @@ package Ada.Streams.Stream_IO is -- used in this package and System.File_IO. for File_Mode use - (In_File => 0, -- System.FIle_IO.File_Mode'Pos (In_File) + (In_File => 0, -- System.File_IO.File_Mode'Pos (In_File) Out_File => 2, -- System.File_IO.File_Mode'Pos (Out_File) Append_File => 3); -- System.File_IO.File_Mode'Pos (Append_File) diff --git a/gcc/ada/sem_ch4.adb b/gcc/ada/sem_ch4.adb index a63d78e04e8..b71e1f9aaeb 100644 --- a/gcc/ada/sem_ch4.adb +++ b/gcc/ada/sem_ch4.adb @@ -1603,7 +1603,7 @@ package body Sem_Ch4 is then U_N := Entity (P); - if Ekind (U_N) in Type_Kind then + if Ekind (U_N) in Type_Kind then -- Reformat node as a type conversion |