diff options
Diffstat (limited to 'gcc/ada/exp_ch9.adb')
| -rw-r--r-- | gcc/ada/exp_ch9.adb | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/gcc/ada/exp_ch9.adb b/gcc/ada/exp_ch9.adb index 6e370f4d871..b39484fc1ef 100644 --- a/gcc/ada/exp_ch9.adb +++ b/gcc/ada/exp_ch9.adb @@ -911,6 +911,12 @@ package body Exp_Ch9 is -- Start of processing for Build_Activation_Chain_Entity begin + -- Activation chain is never used in restricted profile + + if Restricted_Profile then + return; + end if; + Find_Enclosing_Context (N, Context, Context_Id, Decls); -- If an activation chain entity has not been declared already, create |