diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-11-19 11:25:05 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2004-11-19 11:25:05 +0000 |
| commit | 57335d6968a827d84b05d6b5538320e317611c08 (patch) | |
| tree | 83244121c86d11bdd9e4dec6f728dd885a7abcc2 /gcc/ada/gnatchop.adb | |
| parent | 33eeb112c779325ab254d4a16cbafce22ba094b2 (diff) | |
| download | gcc-57335d6968a827d84b05d6b5538320e317611c08.tar.gz | |
* gnat1drv.adb, gnatbind.adb, gnatchop.adb, gnatfind.adb, gnatlink.adb,
gnatls.adb, gnatxref.adb, gprep.adb: Output the copyright message on a
separate line from the version message.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@90910 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/gnatchop.adb')
| -rw-r--r-- | gcc/ada/gnatchop.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/gnatchop.adb b/gcc/ada/gnatchop.adb index 29bb2e9225f..0c5a25227af 100644 --- a/gcc/ada/gnatchop.adb +++ b/gcc/ada/gnatchop.adb @@ -1145,10 +1145,10 @@ procedure Gnatchop is -- tools write to standard output ??? Put (Standard_Error, "GNATCHOP "); - Put (Standard_Error, Gnatvsn.Gnat_Version_String); + Put_Line (Standard_Error, Gnatvsn.Gnat_Version_String); Put_Line (Standard_Error, - " Copyright 1998-2004, Ada Core Technologies Inc."); + "Copyright 1998-2004, Ada Core Technologies Inc."); when 'w' => Overwrite_Files := True; |