ada: Minor tweak in Snames

gcc/ada/

	* snames.ads-tmpl (Name_Present): Move to Repinfo section.

diff --git a/gcc/ada/snames.ads-tmpl b/gcc/ada/snames.ads-tmpl
index 699b8df585152af7b5f0f4ff64f774d90d56111a..d2f724f86cabd2745feada3e60320dfb3df6b01f 100644 (file)
--- a/gcc/ada/snames.ads-tmpl
+++ b/gcc/ada/snames.ads-tmpl
@@ -903,10 +903,6 @@ package Snames is
    Name_Warn                           : constant Name_Id := N + $;
    Name_Working_Storage                : constant Name_Id := N + $;
 
-   --  used by Repinfo JSON I/O
-
-   Name_Present                        : constant Name_Id := N + $;
-
    --  Names of recognized attributes. The entries with the comment "Ada 83"
    --  are attributes that are defined in Ada 83, but not in Ada 95. These
    --  attributes are implemented in all Ada modes in GNAT.
@@ -1372,6 +1368,7 @@ package Snames is
 
    Name_Discriminant                     : constant Name_Id := N + $;
    Name_Operands                         : constant Name_Id := N + $;
+   Name_Present                          : constant Name_Id := N + $;
 
    --  Other miscellaneous names used in front end
    --  Note that the UP_ prefix means use the rest of the name in uppercase,