Commit c4075a15 by Arnaud Charlet Committed by Arnaud Charlet

Minor reforamatting.

From-SVN: r139297
parent 0dd8a0b1
2008-08-20 Arnaud Charlet <charlet@adacore.com> 2008-08-20 Arnaud Charlet <charlet@adacore.com>
* gnatvsn.ads: Minor reformatting.
2008-08-20 Arnaud Charlet <charlet@adacore.com>
* a-crbtgk.adb, repinfo.adb, g-traceb.ads, repinfo.ads, * a-crbtgk.adb, repinfo.adb, g-traceb.ads, repinfo.ads,
system-linux-s390x.ads, s-fatflt.ads, s-parame-ae653.ads, g-spipat.adb, system-linux-s390x.ads, s-fatflt.ads, s-parame-ae653.ads, g-spipat.adb,
g-spipat.ads, g-tasloc.adb, g-debpoo.adb, g-except.ads, g-debpoo.ads, g-spipat.ads, g-tasloc.adb, g-debpoo.adb, g-except.ads, g-debpoo.ads,
...@@ -36,15 +36,15 @@ ...@@ -36,15 +36,15 @@
package Gnatvsn is package Gnatvsn is
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.
function Gnat_Version_String return String; function Gnat_Version_String return String;
-- Version output when GNAT (compiler), or its related tools, including -- Version output when GNAT (compiler), or its related tools, including
-- GNATBIND, GNATCHOP, GNATFIND, GNATLINK, GNATMAKE, GNATXREF, are run -- GNATBIND, GNATCHOP, GNATFIND, GNATLINK, GNATMAKE, GNATXREF, are run
-- (with appropriate verbose option switch set). -- (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.
type Gnat_Build_Type is (FSF, GPL); type Gnat_Build_Type is (FSF, GPL);
-- See Build_Type below for the meaning of these values. -- See Build_Type below for the meaning of these values.
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment