Mercurial > hg > CbC > CbC_gcc

view gcc/testsuite/gfortran.dg/fmt_read_5.f @ 128:fe568345ddd5

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fix CbC-example
author mir3636
date Wed, 11 Apr 2018 19:32:28 +0900
parents 04ced10e8804
children
line wrap: on
line source

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