diff options
| author | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-06-06 10:49:42 +0000 |
|---|---|---|
| committer | charlet <charlet@138bc75d-0d04-0410-961f-82ee72b054a4> | 2007-06-06 10:49:42 +0000 |
| commit | 8e999ebcf9876d12d8f84d799f141275320bb411 (patch) | |
| tree | c2ec4cdeaf3fc8092e453c3306491d7cc670b4e1 /gcc/ada/stylesw.ads | |
| parent | e462e0735b2ccf90f2641b5d644e86f38a0d7b99 (diff) | |
| download | gcc-8e999ebcf9876d12d8f84d799f141275320bb411.tar.gz | |
2007-04-20 Robert Dewar <dewar@adacore.com>
* stylesw.ads, stylesw.adb (Set_GNAT_Style_Check): New procedure
(Set_Style_Check_Options): Recognize new -gnatyg style switch
* switch-c.adb (Scan_Front_End_Switches, case -gnatg): Set
Warn_On_Non_Local_Exception to False, to turn off warnings for
No_Exception_Propagation in ZFP runtime.
(Scan_Front_End_Switches): Fix handling of --RTS switch for non GCC
back-ends.
(Scan_Front_End_Switches): For 'g', call Set_GNAT_Style_Checks
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@125469 138bc75d-0d04-0410-961f-82ee72b054a4
Diffstat (limited to 'gcc/ada/stylesw.ads')
| -rw-r--r-- | gcc/ada/stylesw.ads | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/gcc/ada/stylesw.ads b/gcc/ada/stylesw.ads index 85b823051ca..284b59dd1b8 100644 --- a/gcc/ada/stylesw.ads +++ b/gcc/ada/stylesw.ads @@ -264,6 +264,10 @@ package Stylesw is -- This procedure is called to set the default style checking options -- in response to a -gnaty switch with no suboptions. + procedure Set_GNAT_Style_Check_Options; + -- This procedure is called to set the default style checking options + -- for GNAT units (as set by -gnatg or -gnatyg). + Style_Msg_Buf : String (1 .. 80); Style_Msg_Len : Natural; -- Used to return |