r128788 - /trunk/gcc/ada/exp_dbug.adb

[charlet@gcc.gnu.org]

Author: charlet
Date: Wed Sep 26 10:43:08 2007
New Revision: 128788

URL: http://gcc.gnu.org/viewcvs?root=gcc&view=rev&rev=128788
Log:
2007-09-26  Gary Dismukes  <dismukes@adacore.com>

	* exp_dbug.adb (Debug_Renaming_Declaration): Set Is_Internal on the
	debug variable so that it won't be initialized when pragma
	Initialize_Scalars is in effect.


Modified:
    trunk/gcc/ada/exp_dbug.adb