OSDN Git Service

PR fortran/31725
authorfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 14 May 2007 19:29:33 +0000 (19:29 +0000)
committerfxcoudert <fxcoudert@138bc75d-0d04-0410-961f-82ee72b054a4>
Mon, 14 May 2007 19:29:33 +0000 (19:29 +0000)
commit1bfb5669d2036c938851c85da4431d38fef945c8
tree881664a2a668dabf5b889bcf482119a96600fb05
parent36211c58e2f7334211ed8d2f50f4e1aacca5cbd2
PR fortran/31725

* trans-expr.c (gfc_conv_substring): Evaluate substring bounds
only once.

* gfortran.dg/substr_4.f: New test.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@124720 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/trans-expr.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/substr_4.f [new file with mode: 0644]