From: Arnaud Charlet Date: Wed, 20 Aug 2008 13:58:12 +0000 (+0000) Subject: Minor reforamatting. X-Git-Tag: releases/gcc-4.4.0~3037 X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=c4075a15127d8abf6b3a40e5385f9eb0e2502c25;p=thirdparty%2Fgcc.git Minor reforamatting. From-SVN: r139297 --- diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index 21f4101be48a..cce8405b289c 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,7 @@ +2008-08-20 Arnaud Charlet + + * gnatvsn.ads: Minor reformatting. + 2008-08-20 Arnaud Charlet * a-crbtgk.adb, repinfo.adb, g-traceb.ads, repinfo.ads, diff --git a/gcc/ada/gnatvsn.ads b/gcc/ada/gnatvsn.ads index 530731330e0c..4067c983949f 100644 --- a/gcc/ada/gnatvsn.ads +++ b/gcc/ada/gnatvsn.ads @@ -36,15 +36,15 @@ 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; -- Version output when GNAT (compiler), or its related tools, including -- 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. - type Gnat_Build_Type is (FSF, GPL); -- See Build_Type below for the meaning of these values.