r125443 - in /trunk/gcc/ada: restrict.adb restr...

[charlet@gcc.gnu.org]

Author: charlet
Date: Wed Jun  6 10:41:12 2007
New Revision: 125443

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=125443
Log:
2007-04-20  Arnaud Charlet  <charlet@adacore.com>

	* restrict.ads, restrict.adb (No_Exception_Handlers_Set): Only return
	true if configurable run-time or No_Run_Time is set.
	(Set_Restriction): Avoid setting restriction No_Elaboration_Code when
	processing an unit which is not the one being compiled.


Modified:
    trunk/gcc/ada/restrict.adb
    trunk/gcc/ada/restrict.ads