From: Arnaud Charlet <charlet@gcc.gnu.org>
Date: Fri, 10 Apr 2009 13:22:14 +0000 (+0200)
Subject: Minor clean up.
X-Git-Tag: releases/gcc-4.5.0~6698
X-Git-Url: http://git.ipfire.org/gitweb.cgi?a=commitdiff_plain;h=2a690f1fa638507ef11958dcc3699365727edcaf;p=thirdparty%2Fgcc.git

Minor clean up.

From-SVN: r145899
---

diff --git a/gcc/ada/snames.ads-tmpl b/gcc/ada/snames.ads-tmpl
index 48001f6d9a79..fc7f99233805 100644
--- a/gcc/ada/snames.ads-tmpl
+++ b/gcc/ada/snames.ads-tmpl
@@ -989,7 +989,7 @@ package Snames is
 
    --  Names used in processing intrinsic calls
 
-   Name_Free                             : constant Name_Id := N + 628;
+   Name_Free                             : constant Name_Id := N + $;
 
    --  Reserved words used only in Ada 95
 
@@ -1007,7 +1007,7 @@ package Snames is
 
    --  Miscellaneous names used in semantic checking
 
-   Name_Raise_Exception                  : constant Name_Id := N + 635;
+   Name_Raise_Exception                  : constant Name_Id := N + $;
 
    --  Additional reserved words and identifiers used in GNAT Project Files
    --  Note that Name_External is already previously declared