diff options
author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-09-09 12:31:35 +0000 |
---|---|---|
committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2010-09-09 12:31:35 +0000 |
commit | 240887aae5365d5f04cecb616c4053f28701422e (patch) | |
tree | 9bcd2dc0363cc5444998418b53a4a6358f45d5df /gcc/ada/gprep.adb | |
parent | 1d81d3c9e66fa1790778b365b8b257a38e761dfa (diff) | |
download | ppe42-gcc-240887aae5365d5f04cecb616c4053f28701422e.tar.gz ppe42-gcc-240887aae5365d5f04cecb616c4053f28701422e.zip |
2010-09-09 Thomas Quinot <quinot@adacore.com>
* s-strxdr.adb, gnat_rm.texi, s-stratt-xdr.adb, s-stratt.ads: Rename
s-strxdr.adb to s-stratt-xdr.adb
2010-09-09 Robert Dewar <dewar@adacore.com>
* ali-util.adb (Obsolescent_Check): Removed.
* gprep.adb (Obsolescent_Check): Removed.
Remove Obsolescent_Check parameter in Scng instantiation
* prj-err.adb (Obsolescent_Check): Removed.
* prj-err.ads (Obsolescent_Check): Removed.
Remove Obsolescent_Check parameter in Scng instantiation
* scans.ads (Based_Literal_Uses_Colon): New flag
* scn.adb (Obsolscent_Check_Flag): Removed
(Obsolscent_Check): Removed
(Set_Obsolescent_Check): Removed
(Post_Scan): Add handling for obsolescent features
* scn.ads (Obsolscent_Check): Removed
(Set_Obsolescent_Check): Removed
(Post_Scan): Can no longer be inlined
Remove Obsolescent_Check from instantiation of Scng
* scng.adb (Nlit): Set Based_Literal_Uses_Colon
(Nlit): Remove handling of obsolescent check
(Scan, case '%'): Remove handling of obsolescent check
(Scan, case '|'): Call Post_Scan
(Scan, case '!'): Remove handling of obsolescent check, call Post_Scan
* scng.ads Remove Obsolescent_Check argument from Scng generic
(Post_Scan): Now called for Tok_Vertical_Bar
* sinput-l.adb: Remove calls to Set_Obsolescent_Check
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@164081 138bc75d-0d04-0410-961f-82ee72b054a4
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 -- --------------- |