diff options
| author | Bechir Zalila <bechir.zalila@gmail.com> | 2008-11-07 10:46:18 +0000 |
|---|---|---|
| committer | Eric Botcazou <ebotcazou@gcc.gnu.org> | 2008-11-07 10:46:18 +0000 |
| commit | 7fee6a39eb712a971f56f6c80ccb6b260655d3e8 (patch) | |
| tree | d9fefbd5cf8fd8e9e324b96d58d792f547ef67a1 /gcc/ada/lib.adb | |
| parent | 3453cb7809320683712bdd845a76dd7dac3095ff (diff) | |
| download | gcc-7fee6a39eb712a971f56f6c80ccb6b260655d3e8.zip gcc-7fee6a39eb712a971f56f6c80ccb6b260655d3e8.tar.gz gcc-7fee6a39eb712a971f56f6c80ccb6b260655d3e8.tar.bz2 | |
re PR ada/34289 (gnatmake -s doesn't work)
PR ada/34289
* lib.ads: (Enable_Switch_Storing): Declare.
* lib.adb: (Enable_Switch_Storing): New procedure.
* switch-c.adb (Scan_Front_End_Switches): Add support for -gnatea.
* make.adb: (Compile_Sources.Compile): Add -gnatea as first option.
(Display): Never display -gnatea
* gcc-interface/lang-specs.h: If -gnatea is present, pass -gnatez.
Co-Authored-By: Eric Botcazou <ebotcazou@adacore.com>
From-SVN: r141673
Diffstat (limited to 'gcc/ada/lib.adb')
| -rw-r--r-- | gcc/ada/lib.adb | 15 |
1 files changed, 14 insertions, 1 deletions
diff --git a/gcc/ada/lib.adb b/gcc/ada/lib.adb index dd0e245..5271a45 100644 --- a/gcc/ada/lib.adb +++ b/gcc/ada/lib.adb @@ -49,7 +49,7 @@ with Uname; use Uname; package body Lib is Switch_Storing_Enabled : Boolean := True; - -- Set to False by Disable_Switch_Storing + -- Controlled by Enable_Switch_Storing/Disable_Switch_Storing ----------------------- -- Local Subprograms -- @@ -433,6 +433,19 @@ package body Lib is return Compilation_Switches.Last; end Compilation_Switches_Last; + --------------------------- + -- Enable_Switch_Storing -- + --------------------------- + + procedure Enable_Switch_Storing is + begin + Switch_Storing_Enabled := True; + end Enable_Switch_Storing; + + ---------------------------- + -- Disable_Switch_Storing -- + ---------------------------- + procedure Disable_Switch_Storing is begin Switch_Storing_Enabled := False; |