diff options
| author | Geert Bosch <bosch@gcc.gnu.org> | 2001-12-11 22:49:34 +0100 |
|---|---|---|
| committer | Geert Bosch <bosch@gcc.gnu.org> | 2001-12-11 22:49:34 +0100 |
| commit | 290986ede68c7fb27f1ec54c63aa7c2398601444 (patch) | |
| tree | 8cc7939c95106e6f70eed7984957142b676ad999 /gcc/ada/sem_ch12.adb | |
| parent | 84157f5101464652f4bdf73291f1f824935c7ef8 (diff) | |
| download | gcc-290986ede68c7fb27f1ec54c63aa7c2398601444.tar.gz | |
gnatcmd.adb: Changed /COMPILE_ONLY to /ACTIONS=COMPILE Changed /BIND_ONLY to /ACTIONS=BIND...
* 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.
From-SVN: r47895
Diffstat (limited to 'gcc/ada/sem_ch12.adb')
| -rw-r--r-- | gcc/ada/sem_ch12.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb index 55adc7548b7..2f821b1c72b 100644 --- a/gcc/ada/sem_ch12.adb +++ b/gcc/ada/sem_ch12.adb @@ -2812,6 +2812,8 @@ package body Sem_Ch12 is end if; for J in reverse 1 .. Num_Scopes loop + Scope_Stack.Table (Scope_Stack.Last - J + 1).First_Use_Clause := + Use_Clauses (J); Install_Use_Clauses (Use_Clauses (J)); end loop; |