diff options
Diffstat (limited to 'gcc/ada/gprep.adb')
-rw-r--r-- | gcc/ada/gprep.adb | 14 |
1 files changed, 0 insertions, 14 deletions
diff --git a/gcc/ada/gprep.adb b/gcc/ada/gprep.adb index eb6cdde8220..88710d6206c 100644 --- a/gcc/ada/gprep.adb +++ b/gcc/ada/gprep.adb @@ -91,9 +91,6 @@ package body GPrep is procedure Display_Copyright; -- Display the copyright notice - procedure Obsolescent_Check (S : Source_Ptr); - -- Null procedure, needed by instantiation of Scng below - procedure Post_Scan; -- Null procedure, needed by instantiation of Scng below @@ -103,7 +100,6 @@ package body GPrep is Errutil.Error_Msg_S, Errutil.Error_Msg_SC, Errutil.Error_Msg_SP, - Obsolescent_Check, Errutil.Style); -- The scanner for the preprocessor @@ -311,16 +307,6 @@ package body GPrep is New_Line (Outfile.all); end New_EOL_To_Outfile; - ----------------------- - -- Obsolescent_Check -- - ----------------------- - - procedure Obsolescent_Check (S : Source_Ptr) is - pragma Warnings (Off, S); - begin - null; - end Obsolescent_Check; - --------------- -- Post_Scan -- --------------- |