diff options
Diffstat (limited to 'gcc/ada/restrict.adb')
| -rw-r--r-- | gcc/ada/restrict.adb | 18 |
1 files changed, 0 insertions, 18 deletions
diff --git a/gcc/ada/restrict.adb b/gcc/ada/restrict.adb index d97a42e..966c491 100644 --- a/gcc/ada/restrict.adb +++ b/gcc/ada/restrict.adb @@ -149,24 +149,6 @@ package body Restrict is -- Add specified restriction to stored configuration boolean restrictions. -- This is used for handling the special case of No_Elaboration_Code. - ------------------------- - -- Check_Compiler_Unit -- - ------------------------- - - procedure Check_Compiler_Unit (Feature : String; N : Node_Id) is - begin - if Compiler_Unit then - Error_Msg_N (Feature & " not allowed in compiler unit!!??", N); - end if; - end Check_Compiler_Unit; - - procedure Check_Compiler_Unit (Feature : String; Loc : Source_Ptr) is - begin - if Compiler_Unit then - Error_Msg (Feature & " not allowed in compiler unit!!??", Loc); - end if; - end Check_Compiler_Unit; - ------------------------------------ -- Check_Elaboration_Code_Allowed -- ------------------------------------ |