diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2003-10-24 16:39:55 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2003-10-24 16:39:55 +0200 |
| commit | b6d8393123f45dac768ba6da0dfd58f80074557d (patch) | |
| tree | 63ad526faa5cdc76fb256ad7568983bf9786e597 /gcc/ada/gnatvsn.ads | |
| parent | ebaeca8b5511a2a0a1450d90e81f3611ae391269 (diff) | |
| download | gcc-b6d8393123f45dac768ba6da0dfd58f80074557d.zip gcc-b6d8393123f45dac768ba6da0dfd58f80074557d.tar.gz gcc-b6d8393123f45dac768ba6da0dfd58f80074557d.tar.bz2 | |
gnatvsn.ads (Gnat_Static_Version_String): New constant, used to minimize the differences with ACT tree.
* gnatvsn.ads (Gnat_Static_Version_String): New constant, used to
minimize the differences with ACT tree.
* gnatkr.adb, gnatlink.adb, gnatls.adb, gnatmake.adb,
gnatprep.adb, gnatpsta.adb, gnatvsn.ads: Take advantage of
Gnatvsn.Gnat_Static_Version_String to reduce differences between
ACT and FSF trees.
From-SVN: r72896
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 82996cf..f665e53 100644 --- a/gcc/ada/gnatvsn.ads +++ b/gcc/ada/gnatvsn.ads @@ -41,6 +41,10 @@ package Gnatvsn is -- GNATBIND, GNATCHOP, GNATFIND, GNATLINK, GNATMAKE, GNATXREF, are run -- (with appropriate verbose option switch set). + Gnat_Static_Version_String : constant String := "GNU Ada"; + -- Static string identifying this version, that can be used as an argument + -- to e.g. pragma Ident. + Gnat_Version_Type : constant String := "FSF "; -- GNAT FSF version. This version of GNAT is part of a Free Software -- Foundation release of the GNU Compiler Collection (GCC). The binder |