[Bug fortran/22290] Optimize Assigned GOTO to cause error with -O1 or higher

["cvs-commit at gcc dot gnu dot org" <gcc-bugzilla at gcc dot gnu dot org>]

------- Comment #12 from cvs-commit at gcc dot gnu dot org  2005-10-25 14:06 -------
Subject: Bug 22290

CVSROOT:        /cvs/gcc
Module name:    gcc
Changes by:     fengwang@gcc.gnu.org    2005-10-25 14:06:23

Modified files:
        gcc/testsuite  : ChangeLog 
        gcc/fortran    : ChangeLog trans-decl.c trans-stmt.c 
Added files:
        gcc/testsuite/gfortran.dg: assign_5.f90 assign_6.f 

Log message:
        2005-10-25  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.

        2005-10-25  Feng Wang  <fengwang@nudt.edu.cn>

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

Patches:
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/ChangeLog.diff?cvsroot=gcc&r1=1.6250&r2=1.6251
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/assign_5.f90.diff?cvsroot=gcc&r1=1.1&r2=1.2
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/testsuite/gfortran.dg/assign_6.f.diff?cvsroot=gcc&r1=1.1&r2=1.2
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/ChangeLog.diff?cvsroot=gcc&r1=1.598&r2=1.599
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/trans-decl.c.diff?cvsroot=gcc&r1=1.72&r2=1.73
http://gcc.gnu.org/cgi-bin/cvsweb.cgi/gcc/gcc/fortran/trans-stmt.c.diff?cvsroot=gcc&r1=1.42&r2=1.43


-- 


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=22290