[Fortran, patch] PR22290 - Initialization of non-static variable and ICE of dummy argument in ASSIGN statement

[Feng Wang]

:ADDPATCH fortran:

This PR disappeared long time ago. But the initialization of auxiliary
variables is not correct if we assign a label to a non-static variable. And
will cause ICE if we assign to a dummy argument.

Bootstap tested for mainline and gcc4.0 without any regression on i686-linux.
OK for mainline and 4.0?

Best Regards,
Feng Wang


fortran/ChangeLog:
2005-10-11  Feng Wang  <fengwang@nudt.edu.cn>

	PR fortran/22290
	* trans-decl.c (gfc_add_assign_aux_vars): New function. Add two
	auxiliary variables.
	(gfc_get_symbol_decl): Use it when a variable, including dummy
	argument, is assigned a label.
	(gfc_trans_assign_aux_var): New function. Set initial value of
	the auxiliary variable explicitly.
	(gfc_trans_deferred_vars): Use it.
	* trans-stmt.c (gfc_conv_label_variable): Handle dummy argument.

testsuite/ChangeLog
2005-10-11  Feng Wang  <fengwang@nudt.edu.cn>

	PR fortran/22290
	* gfortran.dg/assign_5.f90: New test.
	* gfortran.dg/assign_6.f: New test.



		
__________________________________ 
Meet your soulmate!
Yahoo! Asia presents Meetic - where millions of singles gather
http://asia.yahoo.com/meetic
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: assign_5.f90
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20051011/033bae2d/attachment.f90>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: assign_6.f
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20051011/033bae2d/attachment.ksh>
-------------- next part --------------
An embedded and charset-unspecified text was scrubbed...
Name: pr22290.diff
URL: <http://gcc.gnu.org/pipermail/fortran/attachments/20051011/033bae2d/attachment-0001.ksh>