| Index: gcc/gcc/testsuite/gfortran.dg/streamio_2.f90
|
| diff --git a/gcc/gcc/testsuite/gfortran.dg/streamio_2.f90 b/gcc/gcc/testsuite/gfortran.dg/streamio_2.f90
|
| index a7d5d3ccfaa262a1ca06992761dae1f1dee13953..8260a7481c92a06a5095db94ad7e63a71bfeea77 100644
|
| --- a/gcc/gcc/testsuite/gfortran.dg/streamio_2.f90
|
| +++ b/gcc/gcc/testsuite/gfortran.dg/streamio_2.f90
|
| @@ -1,4 +1,6 @@
|
| ! { dg-do run }
|
| +! { dg-options "-std=legacy" }
|
| +!
|
| ! PR25828 Stream IO test 2
|
| ! Contributed by Jerry DeLisle <jvdelisle@verizon.net>.
|
| PROGRAM readUstream
|
| @@ -16,4 +18,5 @@ PROGRAM readUstream
|
| if (string.ne."rst") call abort()
|
| if (n.ne.7) call abort()
|
| close(unit=11, status="delete")
|
| -END PROGRAM readUstream
|
| +END PROGRAM readUstream
|
| +
|
|
|