diff options
author | Arnaud Charlet <charlet@gcc.gnu.org> | 2004-11-19 12:25:05 +0100 |
---|---|---|
committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2004-11-19 12:25:05 +0100 |
commit | 87b62748db18a61884ae1d37e8bbdf098400ddd8 (patch) | |
tree | 83244121c86d11bdd9e4dec6f728dd885a7abcc2 /gcc/ada/gnatfind.adb | |
parent | 47190c6bc99ff904e4edc67b772e1d222726b900 (diff) | |
download | gcc-87b62748db18a61884ae1d37e8bbdf098400ddd8.zip gcc-87b62748db18a61884ae1d37e8bbdf098400ddd8.tar.gz gcc-87b62748db18a61884ae1d37e8bbdf098400ddd8.tar.bz2 |
gnat1drv.adb, [...]: Output the copyright message on a separate line from the version message.
* 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.
From-SVN: r90910
Diffstat (limited to 'gcc/ada/gnatfind.adb')
-rw-r--r-- | gcc/ada/gnatfind.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/gnatfind.adb b/gcc/ada/gnatfind.adb index c59ae49..44abac5 100644 --- a/gcc/ada/gnatfind.adb +++ b/gcc/ada/gnatfind.adb @@ -238,8 +238,8 @@ procedure Gnatfind is procedure Write_Usage is begin - Put_Line ("GNATFIND " & Gnatvsn.Gnat_Version_String - & " Copyright 1998-2004, Ada Core Technologies Inc."); + Put_Line ("GNATFIND " & Gnatvsn.Gnat_Version_String); + Put_Line ("Copyright 1998-2004, Ada Core Technologies Inc."); Put_Line ("Usage: gnatfind pattern[:sourcefile[:line[:column]]] " & "[file1 file2 ...]"); New_Line; |