From 2a690f1fa638507ef11958dcc3699365727edcaf Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Fri, 10 Apr 2009 15:22:14 +0200 Subject: [PATCH] Minor clean up. From-SVN: r145899 --- gcc/ada/snames.ads-tmpl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/gcc/ada/snames.ads-tmpl b/gcc/ada/snames.ads-tmpl index 48001f6..fc7f992 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 -- 2.7.4