From: Jerry DeLisle Date: Sun, 5 Jun 2016 19:58:38 +0000 (+0000) Subject: re PR fortran/71404 (416.gamess in SPEC CPU 2006 failed to build) X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=9c1eb332b0be418524796f1265083808bbb5319f;p=gcc.git re PR fortran/71404 (416.gamess in SPEC CPU 2006 failed to build) 2016-06-05 Jerry DeLisle PR fortran/71404 * gfortran.dg/fmt_read_5.f: New test. From-SVN: r237109 --- diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog index 583a7cf9066..e1df37bf431 100644 --- a/gcc/testsuite/ChangeLog +++ b/gcc/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2016-06-05 Jerry DeLisle + + PR fortran/71404 + * gfortran.dg/fmt_read_5.f: New test. + 2016-06-05 Andre Vehreschild PR fortran/69659 diff --git a/gcc/testsuite/gfortran.dg/fmt_read_5.f b/gcc/testsuite/gfortran.dg/fmt_read_5.f new file mode 100644 index 00000000000..c41e149cf3e --- /dev/null +++ b/gcc/testsuite/gfortran.dg/fmt_read_5.f @@ -0,0 +1,8 @@ +c { dg-do compile } +c PR71404 [7 Regression] 416.gamess in SPEC CPU 2006 failed to build + SUBROUTINE SQRINT (LFILE,IREGION,LENGTH) + DIMENSION IREGION(LENGTH) + LOGICAL DSKWRK,MASWRK + IF (DSKWRK.OR.MASWRK) READ(LFILE, END=200) IREGION + 200 CONTINUE + END