re PR debug/40666 (Ada tools build failure)

PR debug/40666
	* dbxout.c (dbxout_symbol) <PARM_DECL>: Deal with parameters pointing
	to variables for debugging purposes.

From-SVN: r149346
This commit is contained in:
Eric Botcazou 2009-07-07 20:46:06 +00:00 committed by Eric Botcazou
parent 4db19cc759
commit ed3346c20d
2 changed files with 15 additions and 3 deletions

View File

@ -1,3 +1,9 @@
2009-07-07 Eric Botcazou <ebotcazou@adacore.com>
PR debug/40666
* dbxout.c (dbxout_symbol) <PARM_DECL>: Deal with parameters pointing
to variables for debugging purposes.
2009-06-23 Mark Loeser <mark@halcy0n.com>
PR build/40010

View File

@ -2778,9 +2778,15 @@ dbxout_symbol (tree decl, int local ATTRIBUTE_UNUSED)
}
case PARM_DECL:
/* Parm decls go in their own separate chains
and are output by dbxout_reg_parms and dbxout_parms. */
gcc_unreachable ();
if (DECL_HAS_VALUE_EXPR_P (decl))
decl = DECL_VALUE_EXPR (decl);
/* PARM_DECLs go in their own separate chain and are output by
dbxout_reg_parms and dbxout_parms, except for those that are
disguised VAR_DECLs like Out parameters in Ada. */
gcc_assert (TREE_CODE (decl) == VAR_DECL);
/* ... fall through ... */
case RESULT_DECL:
case VAR_DECL: