From da8b631d93f0af0c0ef16af22223093403db229b Mon Sep 17 00:00:00 2001 From: charlet Date: Fri, 10 Sep 2010 09:41:06 +0000 Subject: 2010-09-10 Robert Dewar * opt.adb (Short_Descriptors): New flag (Short_Descriptors_Config): New flag * opt.ads (Short_Descriptors): New flag (Short_Descriptors_Config): New flag * par-prag.adb: Add dummy entry for Short_Descriptors pragma * sem_prag.adb (Set_Mechanism_Value): Deal with Short_Descriptors pragma (Analyze_Pragma): Implement Short_Descriptors pragma * snames.ads-tmpl: Add entry for Short_Descriptors pragma 2010-09-10 Emmanuel Briot * prj-util.adb, prj-util.ads (Executable_Of): Take into account the project's Executable_Suffix. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@164147 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/snames.ads-tmpl | 2 ++ 1 file changed, 2 insertions(+) (limited to 'gcc/ada/snames.ads-tmpl') diff --git a/gcc/ada/snames.ads-tmpl b/gcc/ada/snames.ads-tmpl index 7abd945de0a..411e3dbd3f0 100644 --- a/gcc/ada/snames.ads-tmpl +++ b/gcc/ada/snames.ads-tmpl @@ -386,6 +386,7 @@ package Snames is Name_Restriction_Warnings : constant Name_Id := N + $; -- GNAT Name_Reviewable : constant Name_Id := N + $; Name_Short_Circuit_And_Or : constant Name_Id := N + $; -- GNAT + Name_Short_Descriptors : constant Name_Id := N + $; -- GNAT Name_Source_File_Name : constant Name_Id := N + $; -- GNAT Name_Source_File_Name_Project : constant Name_Id := N + $; -- GNAT Name_Style_Checks : constant Name_Id := N + $; -- GNAT @@ -1466,6 +1467,7 @@ package Snames is Pragma_Restriction_Warnings, Pragma_Reviewable, Pragma_Short_Circuit_And_Or, + Pragma_Short_Descriptors, Pragma_Source_File_Name, Pragma_Source_File_Name_Project, Pragma_Style_Checks, -- cgit v1.2.1