aboutsummaryrefslogtreecommitdiff
path: root/gcc/ada
diff options
context:
space:
mode:
authorVincent Celier <celier@adacore.com>2010-10-05 10:00:45 +0000
committerArnaud Charlet <charlet@gcc.gnu.org>2010-10-05 12:00:45 +0200
commit610ef7c0f9b816601f89d3483ef9824da717c0e3 (patch)
tree097ed95178ce41d5bdb105d1c5bc31f0e34938c3 /gcc/ada
parent1c218ac3ff294a2e73e8bb002aa398aaea60f41b (diff)
downloadgcc-610ef7c0f9b816601f89d3483ef9824da717c0e3.zip
gcc-610ef7c0f9b816601f89d3483ef9824da717c0e3.tar.gz
gcc-610ef7c0f9b816601f89d3483ef9824da717c0e3.tar.bz2
vms_data.ads: Add VMS qualifier /SRC_INFO= corresponding to gnatmake switch --create-info-file=.
2010-10-05 Vincent Celier <celier@adacore.com> * vms_data.ads: Add VMS qualifier /SRC_INFO= corresponding to gnatmake switch --create-info-file=. * gnat_ugn.texi: Add documentation for new gnatmake switch --source-info= From-SVN: r164977
Diffstat (limited to 'gcc/ada')
-rw-r--r--gcc/ada/ChangeLog7
-rw-r--r--gcc/ada/gnat_ugn.texi15
-rw-r--r--gcc/ada/vms_data.ads8
3 files changed, 30 insertions, 0 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog
index 0d57cde..b956feb 100644
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
@@ -1,3 +1,10 @@
+2010-10-05 Vincent Celier <celier@adacore.com>
+
+ * vms_data.ads: Add VMS qualifier /SRC_INFO= corresponding to gnatmake
+ switch --create-info-file=.
+ * gnat_ugn.texi: Add documentation for new gnatmake switch
+ --source-info=
+
2010-10-05 Ed Schonberg <schonberg@adacore.com>
* sem_ch3.adb: Do not elaborate type definition if syntax error.
diff --git a/gcc/ada/gnat_ugn.texi b/gcc/ada/gnat_ugn.texi
index 3c00382..2166696 100644
--- a/gcc/ada/gnat_ugn.texi
+++ b/gcc/ada/gnat_ugn.texi
@@ -9342,6 +9342,21 @@ By default, shared library projects are not allowed to import static library
projects. When this switch is used on the command line, this restriction is
relaxed.
+@item ^--source-info=<source info file>^/SRC_INFO=source-info-file^
+Specify a source info file. This switch is active only when project files
+are used. If the source info file is specified as a relative path, then it is
+relative to the object directory of the main project. If the source info file
+does not exist, then after the Project Manager has successfully parsed and
+processed the project files and found the sources, it creates the source info
+file. If the source info file already exists and can be read successfully,
+then the Project Manager will get all the needed information about the sources
+from the source info file and will not look for them. This reduces the time
+to process the project files, especially when looking for sources that take a
+long time. If the source info file exists but cannot be parsed successfully,
+the Project Manager will attempt to recreate it. If the Project Manager fails
+to create the source info file, a message is issued, but gnatmake does not
+fail.
+
@ifclear vms
@item --create-map-file
When linking an executable, create a map file. The name of the map file
diff --git a/gcc/ada/vms_data.ads b/gcc/ada/vms_data.ads
index 675e4f5..cdb883e 100644
--- a/gcc/ada/vms_data.ads
+++ b/gcc/ada/vms_data.ads
@@ -4902,6 +4902,13 @@ package VMS_Data is
--
-- When looking for source files also look in the specified directories.
+ S_Make_Src_Info : aliased constant S := "/SRC_INFO=<" &
+ "--source-info-file=>";
+ -- /SRC_INFO=source-info-file
+ --
+ -- Specify a source info file to be read or written by the Project
+ -- Manager when project files are used.
+
S_Make_Stand : aliased constant S := "/STANDARD_OUTPUT_FOR_COMMANDS " &
"-eS";
-- /NOSTANDARD_OUTPUT_FOR_COMMANDS (D)
@@ -5012,6 +5019,7 @@ package VMS_Data is
S_Make_Single 'Access,
S_Make_Skip 'Access,
S_Make_Source 'Access,
+ S_Make_Src_Info'Access,
S_Make_Stand 'Access,
S_Make_Subdirs 'Access,
S_Make_Switch 'Access,