diff options
| author | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-12-11 21:49:34 +0000 |
|---|---|---|
| committer | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-12-11 21:49:34 +0000 |
| commit | 57f302e522c72c1aa7848b435f7c890aadb437d7 (patch) | |
| tree | 8cc7939c95106e6f70eed7984957142b676ad999 /gcc/ada/gnatcmd.adb | |
| parent | 8b718dab6c276a48344a37ecbaa5741466f15311 (diff) | |
| download | gcc-57f302e522c72c1aa7848b435f7c890aadb437d7.tar.gz | |
* gnatcmd.adb:
Changed /COMPILE_ONLY to /ACTIONS=COMPILE
Changed /BIND_ONLY to /ACTIONS=BIND
Changed /LINK_ONLY to /ACTIONS=LINK
* sem_ch8.adb (Find_Selected_Component): improved search for a
candidate package in case of error.
* sem_ch12.adb (Inline_Instance_Body): place head of use_clause
chain back on scope stack before reinstalling use clauses.
* exp_ch5.adb (Expand_N_If_Statement): if Constant_Condition_Warnings
is enabled, do not kill the code for the condition, to preserve
warning.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@47895 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/gnatcmd.adb')
| -rw-r--r-- | gcc/ada/gnatcmd.adb | 21 |
1 files changed, 9 insertions, 12 deletions
diff --git a/gcc/ada/gnatcmd.adb b/gcc/ada/gnatcmd.adb index 127c3045070..bf98c69c7e7 100644 --- a/gcc/ada/gnatcmd.adb +++ b/gcc/ada/gnatcmd.adb @@ -1011,18 +1011,20 @@ procedure GNATCmd is -- Switches for GNAT MAKE -- ---------------------------- + S_Make_Actions : aliased constant S := "/ACTIONS=" & + "COMPILE " & + "-c " & + "BIND " & + "-b " & + "LINK " & + "-l "; + S_Make_All : aliased constant S := "/ALL_FILES " & "-a"; - S_Make_Bind_Only : aliased constant S := "/BIND_ONLY " & - "-b"; - S_Make_Bind : aliased constant S := "/BINDER_QUALIFIERS=?" & "-bargs BIND"; - S_Make_Compile_Only : aliased constant S := "/COMPILE_ONLY " & - "-c"; - S_Make_Comp : aliased constant S := "/COMPILER_QUALIFIERS=?" & "-cargs COMPILE"; @@ -1056,9 +1058,6 @@ procedure GNATCmd is S_Make_Link : aliased constant S := "/LINKER_QUALIFIERS=?" & "-largs LINK"; - S_Make_Link_Only : aliased constant S := "/LINK_ONLY " & - "-l"; - S_Make_Minimal : aliased constant S := "/MINIMAL_RECOMPILATION " & "-m"; @@ -1099,11 +1098,10 @@ procedure GNATCmd is "-v"; Make_Switches : aliased constant Switches := ( + S_Make_Actions 'Access, S_Make_All 'Access, S_Make_Bind 'Access, - S_Make_Bind_Only'Access, S_Make_Comp 'Access, - S_Make_Compile_Only'Access, S_Make_Cond 'Access, S_Make_Cont 'Access, S_Make_Current 'Access, @@ -1115,7 +1113,6 @@ procedure GNATCmd is S_Make_Inplace 'Access, S_Make_Library 'Access, S_Make_Link 'Access, - S_Make_Link_Only'Access, S_Make_Minimal 'Access, S_Make_Nolink 'Access, S_Make_Nostinc 'Access, |