diff options
| author | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-10-25 23:53:04 +0000 |
|---|---|---|
| committer | bosch <bosch@138bc75d-0d04-0410-961f-82ee72b054a4> | 2001-10-25 23:53:04 +0000 |
| commit | d64977bbc400efe4c676725a94f465ea2b14ab4c (patch) | |
| tree | 43f8492180db7f957790c615ed91f67a02770dee | |
| parent | 19a8f02c0feb1a5551516ebfa573f3023f5077ef (diff) | |
| download | ppe42-gcc-d64977bbc400efe4c676725a94f465ea2b14ab4c.tar.gz ppe42-gcc-d64977bbc400efe4c676725a94f465ea2b14ab4c.zip | |
* restrict.adb (Set_No_Run_Time_Mode): Set Discard_Names as default
in no run time mode.
git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@46507 138bc75d-0d04-0410-961f-82ee72b054a4
| -rw-r--r-- | gcc/ada/ChangeLog | 5 | ||||
| -rw-r--r-- | gcc/ada/restrict.adb | 1 |
2 files changed, 6 insertions, 0 deletions
diff --git a/gcc/ada/ChangeLog b/gcc/ada/ChangeLog index b581007ecc9..b94b7516cdc 100644 --- a/gcc/ada/ChangeLog +++ b/gcc/ada/ChangeLog @@ -1,3 +1,8 @@ +2001-10-25 Robert Dewar <dewar@gnat.com> + + * restrict.adb (Set_No_Run_Time_Mode): Set Discard_Names as default + in no run time mode. + 2001-10-25 Pascal Obry <obry@gnat.com> * gnatmem.adb (Read_Next): fix Curs2 value to properly handle quiet diff --git a/gcc/ada/restrict.adb b/gcc/ada/restrict.adb index 05140887a98..a72bf71d5c7 100644 --- a/gcc/ada/restrict.adb +++ b/gcc/ada/restrict.adb @@ -378,6 +378,7 @@ package body Restrict is begin No_Run_Time := True; Restrictions (No_Exception_Handlers) := True; + Opt.Global_Discard_Names := True; end Set_No_Run_Time_Mode; ------------------- |
