Commit 75b81dcd by Thomas Koenig

structure_constructor_14.f90: Adjust STOP number.

2018-02-20  Thomas Koenig  <tkoenig@gcc.gnu.org>

	* gfortran.dg/structure_constructor_14.f90: Adjust STOP number.

From-SVN: r257859
parent 2fad0cf5
2018-02-20 Thomas Koenig <tkoenig@gcc.gnu.org>
* gfortran.dg/structure_constructor_14.f90: Adjust STOP number.
2018-02-20 Thomas Koenig <tkoenig@gcc.gnu.org>
PR fortran/48890
PR fortran/83823
* gfortran.dg/structure_constructor_14.f90: New test.
......
......@@ -20,5 +20,5 @@ program gfcbug145
write(line,'(20(a8,:,"|"))') pack (obstyp% name, mask)
if (line /= 'SYNOP |DRIBU |TEMP |RADAR') STOP 1
write (line,'("|",A,"|")') x
if (line /= "|asdf |") STOP 1
if (line /= "|asdf |") STOP 2
end program gfcbug145
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment