OpenE2K
/
gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

misc.c (gnat_printable_name): Always return a copy in GC memory. 

* gcc-interface/misc.c (gnat_printable_name): Always return a copy
	in GC memory.

From-SVN: r141638
This commit is contained in:
Eric Botcazou 2008-11-06 11:42:52 +00:00 committed by Eric Botcazou
parent 8b659f794a
commit baf6e6a838
2 changed files with 8 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
gcc/ada/ChangeLog
View File

@ -1,3 +1,8 @@
2008-11-06 Eric Botcazou <ebotcazou@adacore.com>
* gcc-interface/misc.c (gnat_printable_name): Always return a copy
in GC memory.
2008-11-06 Eric Botcazou <ebotcazou@adacore.com> 2008-11-06 Eric Botcazou <ebotcazou@adacore.com>
PR ada/19419 PR ada/19419

6
gcc/ada/gcc-interface/misc.c
View File

@ -603,10 +603,10 @@ gnat_printable_name (tree decl, int verbosity)
if (verbosity == 2) if (verbosity == 2)
{ {
Set_Identifier_Casing (ada_name, (char *) DECL_SOURCE_FILE (decl)); Set_Identifier_Casing (ada_name, (char *) DECL_SOURCE_FILE (decl));
ada_name = Name_Buffer; return ggc_strdup (Name_Buffer);
} }
else
return (const char *) ada_name; return ada_name;
} }
/* Expands GNAT-specific GCC tree nodes. The only ones we support /* Expands GNAT-specific GCC tree nodes. The only ones we support