diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-08-31 10:19:18 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-08-31 10:19:18 +0000 |
| commit | a723873ac68caf7f6355582fd214698aff9173d0 (patch) | |
| tree | c8c87d18a9109794633d5e936943a3f76d7e949f /gcc/ada/gnatvsn.ads | |
| parent | 0fc62fac18791458a32a16fc74766c775ddd6a34 (diff) | |
| download | gcc-a723873ac68caf7f6355582fd214698aff9173d0.tar.gz | |
2007-08-30 Vincent Celier <celier@adacore.com>
PR ada/4720
* gnatchop.adb, gnatfind.adb, gnatlink.adb, gnatls.adb,
gnatname.adb, gnatxref.adb, gprep.adb, clean.adb gnatbind.adb
(Check_Version_And_Help): New procedure in package Switch to process
switches --version and --help.
Use Check_Version_And_Help in GNAT tools
* make.adb: Ditto.
(Compile_Sources): Make sure that sources that are "excluded" are not
compiled.
(Gnatmake): Do not issue -aO. to gnatbind and only issue -I- if a
project file is used.
(Version_Switch): Remove, moved to Switch
(Help_Switch): Remove, moved to Switch
(Display_Version): Remove, moved to Switch
* switch.ads, switch.adb (Check_Version_And_Help): New procedure in
package Switch to process switches --version and --help.
(Display_Version): New procedure
* gnatvsn.ads, gnatvsn.adb (Copyright_Holder): New function.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@127967 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/gnatvsn.ads')
| -rw-r--r-- | gcc/ada/gnatvsn.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/gnatvsn.ads b/gcc/ada/gnatvsn.ads index c3c17a30cef..1b1398920ba 100644 --- a/gcc/ada/gnatvsn.ads +++ b/gcc/ada/gnatvsn.ads @@ -68,6 +68,10 @@ package Gnatvsn is -- Text to be displayed by the different GNAT tools when switch --version -- is used. This text depends on the GNAT build type. + function Copyright_Holder return String; + -- Return the name of the Copyright holder to be displayed by the different + -- GNAT tools when switch --version is used. + Ver_Len_Max : constant := 64; -- Longest possible length for Gnat_Version_String in this or any -- other version of GNAT. This is used by the binder to establish |