diff options
| author | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-29 16:53:10 +0200 |
|---|---|---|
| committer | Arnaud Charlet <charlet@gcc.gnu.org> | 2014-07-29 16:53:10 +0200 |
| commit | 5ae243127908fa14634e086d2e55b8a996f95a2c (patch) | |
| tree | 796fc6ce2f5ce29e6152b38ef2f353d67a74b52b /gcc/ada/prepcomp.adb | |
| parent | 3c04da40217fd70dea865002a045625bc7a62fd6 (diff) | |
| download | gcc-5ae243127908fa14634e086d2e55b8a996f95a2c.zip gcc-5ae243127908fa14634e086d2e55b8a996f95a2c.tar.gz gcc-5ae243127908fa14634e086d2e55b8a996f95a2c.tar.bz2 | |
[multiple changes]
2014-07-29 Vincent Celier <celier@adacore.com>
* frontend.adb: Add dependency on gnat.adc when taken into account
and on non-temporary configuration pragmas files specified in
switches -gnatec.
* prepcomp.ads, prepcomp.adb (Add_Dependency): New procedure to add
dependencies on configuration pragmas files.
2014-07-29 Pat Rogers <rogers@adacore.com>
* gnat_ugn.texi: Minor clarification to the explanation for the
GNATtest -v switch.
From-SVN: r213204
Diffstat (limited to 'gcc/ada/prepcomp.adb')
| -rw-r--r-- | gcc/ada/prepcomp.adb | 20 |
1 files changed, 13 insertions, 7 deletions
diff --git a/gcc/ada/prepcomp.adb b/gcc/ada/prepcomp.adb index 2cc1c5e..737ebf2 100644 --- a/gcc/ada/prepcomp.adb +++ b/gcc/ada/prepcomp.adb @@ -6,7 +6,7 @@ -- -- -- B o d y -- -- -- --- Copyright (C) 2003-2012, Free Software Foundation, Inc. -- +-- Copyright (C) 2003-2014, Free Software Foundation, Inc. -- -- -- -- GNAT is free software; you can redistribute it and/or modify it under -- -- terms of the GNU General Public License as published by the Free Soft- -- @@ -34,7 +34,6 @@ with Scn; use Scn; with Sinput.L; use Sinput.L; with Stringt; use Stringt; with Table; -with Types; use Types; package body Prepcomp is @@ -137,6 +136,16 @@ package body Prepcomp is end loop; end Add_Command_Line_Symbols; + -------------------- + -- Add_Dependency -- + -------------------- + + procedure Add_Dependency (S : Source_File_Index) is + begin + Dependencies.Increment_Last; + Dependencies.Table (Dependencies.Last) := S; + end Add_Dependency; + ---------------------- -- Add_Dependencies -- ---------------------- @@ -543,9 +552,7 @@ package body Prepcomp is -- Record the dependency on the preprocessor data file - Dependencies.Increment_Last; - Dependencies.Table (Dependencies.Last) := - Source_Index_Of_Preproc_Data_File; + Add_Dependency (Source_Index_Of_Preproc_Data_File); end Parse_Preprocessing_Data_File; --------------------------- @@ -676,8 +683,7 @@ package body Prepcomp is end loop; if Add_Deffile then - Dependencies.Increment_Last; - Dependencies.Table (Dependencies.Last) := Deffile; + Add_Dependency (Deffile); end if; end; |