gcc/gcc/ada exp_dbug.ads exp_dbug.adb

[charlet@gcc.gnu.org]

CVSROOT:	/cvs/gcc
Module name:	gcc
Changes by:	charlet@gcc.gnu.org	2005-06-16 08:37:52

Modified files:
	gcc/ada        : exp_dbug.ads exp_dbug.adb 

Log message:
	2005-06-14  Nicolas Setton  <setton@adacore.com>
	Ed Schonberg  <schonberg@adacore.com>
	
	* exp_dbug.ads, exp_dbug.adb (Get_Variant_Part): Fix the encoding of
	the "simple_choice" member in a variant record, in accordance with the
	description in the package spec: the information output for a constant
	should be "S number", not "SS number".
	(Get_Encoded_Name): Return at once if not generating code. Avoids name
	overflow problem when compiling with -gnatct, for ASIS/gnatmetrics.

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/ada/exp_dbug.ads.diff?cvsroot=gcc&r1=1.11&r2=1.12
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/ada/exp_dbug.adb.diff?cvsroot=gcc&r1=1.11&r2=1.12