Mercurial > hg > CbC > CbC_gcc

diff gcc/testsuite/gfortran.dg/pr19926.f90 @ 132:d34655255c78

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
update gcc-8.2
author mir3636
date Thu, 25 Oct 2018 10:21:07 +0900
parents 84e7813d76e9
children
line wrap: on
line diff
--- a/gcc/testsuite/gfortran.dg/pr19926.f90	Thu Oct 25 08:08:40 2018 +0900
+++ b/gcc/testsuite/gfortran.dg/pr19926.f90	Thu Oct 25 10:21:07 2018 +0900
@@ -10,11 +10,11 @@
   type(cat) z
   integer :: i = 0, j(4,3,2) = 0
   call string_comp(i)
-  if (i /= 3) call abort
+  if (i /= 3) STOP 1
   call string_comp(z%i)
-  if (z%i /= 3) call abort
+  if (z%i /= 3) STOP 2
   call string_comp(j(1,2,1))
-  if (j(1,2,1) /= 3) call abort
+  if (j(1,2,1) /= 3) STOP 3
 end program a
 
 subroutine string_comp(i)