Skip to content

R
riscv-gcc-1
Commit e12fbc9e by Robert Dewar Committed by Geert Bosch
Options

restrict.adb (Set_No_Run_Time_Mode): Set Discard_Names as default in no run time mode. 

	* restrict.adb (Set_No_Run_Time_Mode): Set Discard_Names as default
	in no run time mode.

From-SVN: r46507
parent 52b80488
Showing with 6 additions and 0 deletions
gcc/ada/ChangeLog
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> 2001-10-25 Pascal Obry <obry@gnat.com>
* gnatmem.adb (Read_Next): fix Curs2 value to properly handle quiet * gnatmem.adb (Read_Next): fix Curs2 value to properly handle quiet
......
gcc/ada/restrict.adb
...@@ -378,6 +378,7 @@ package body Restrict is ...@@ -378,6 +378,7 @@ package body Restrict is
begin begin
No_Run_Time := True; No_Run_Time := True;
Restrictions (No_Exception_Handlers) := True; Restrictions (No_Exception_Handlers) := True;
Opt.Global_Discard_Names := True;
end Set_No_Run_Time_Mode; end Set_No_Run_Time_Mode;
------------------- -------------------
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment