re PR libfortran/61049 (NIST test FM906 fails)
2014-05-06 Jerry DeLisle <jvdelisle@gcc.gnu> PR libfortran/61049 * gfortran.dg/list_read_13.f: New test. From-SVN: r210135
This commit is contained in:
parent
0222756393
commit
157a50f99c
2 changed files with 18 additions and 0 deletions
|
@ -1,3 +1,8 @@
|
|||
2014-05-06 Jerry DeLisle <jvdelisle@gcc.gnu>
|
||||
|
||||
PR libfortran/61049
|
||||
* gfortran.dg/list_read_13.f: New test.
|
||||
|
||||
2014-05-06 Kenneth Zadeck <zadeck@naturalbridge.com>
|
||||
Mike Stump <mikestump@comcast.net>
|
||||
Richard Sandiford <rdsandiford@googlemail.com>
|
||||
|
|
13
gcc/testsuite/gfortran.dg/list_read_13.f
Normal file
13
gcc/testsuite/gfortran.dg/list_read_13.f
Normal file
|
@ -0,0 +1,13 @@
|
|||
c { dg-do run }
|
||||
c PR61049, reduced test case by Dominique d'Humieres
|
||||
character(len=30) :: buff = ", (2.0, 3.0),,6.0D0, 2*,"
|
||||
DOUBLE PRECISION AVD, BVD, CVD, DVCORR
|
||||
COMPLEX AVC, BVC, CVC, ZVCORR
|
||||
|
||||
read(buff, *, err=10) AVD, AVC, BVC, BVD, CVC, CVD
|
||||
goto 20
|
||||
10 call abort
|
||||
20 continue
|
||||
end
|
||||
|
||||
|
Loading…
Add table
Reference in a new issue