structure_constructor_14.f90: Adjust STOP number.
authorThomas Koenig <tkoenig@gcc.gnu.org>
Tue, 20 Feb 2018 19:53:42 +0000 (19:53 +0000)
committerThomas Koenig <tkoenig@gcc.gnu.org>
Tue, 20 Feb 2018 19:53:42 +0000 (19:53 +0000)
2018-02-20  Thomas Koenig  <tkoenig@gcc.gnu.org>

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

From-SVN: r257859

gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/structure_constructor_14.f90

index 035e48d16c5717119463e356eb5843f055207bdb..a72601690ce1810915bbf2013354aa6ce093a7f6 100644 (file)
@@ -1,3 +1,7 @@
+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
index b8892063434fcd759c4d4f4434ce1dddff7f424d..10626f2a12ae30ba7b9cc9e437c2bcea6b01ec49 100644 (file)
@@ -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