From 57f302e522c72c1aa7848b435f7c890aadb437d7 Mon Sep 17 00:00:00 2001 From: bosch Date: Tue, 11 Dec 2001 21:49:34 +0000 Subject: * 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 --- gcc/ada/sem_ch12.adb | 2 ++ 1 file changed, 2 insertions(+) (limited to 'gcc/ada/sem_ch12.adb') 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; -- cgit v1.2.1