Mercurial > hg > CbC > CbC_gcc

comparison libgomp/testsuite/libgomp.fortran/collapse1.f90 @ 131:84e7813d76e9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
gcc-8.2
author mir3636
date Thu, 25 Oct 2018 07:37:49 +0900
parents a06113de4d67
children 1830386684a0
comparison
equal deleted inserted replaced
111:04ced10e8804 131:84e7813d76e9
20 if (a(i, j, k) .ne. (i + j + k)) l = .true. 20 if (a(i, j, k) .ne. (i + j + k)) l = .true.
21 end do 21 end do
22 end do 22 end do
23 end do 23 end do
24 !$omp end parallel do 24 !$omp end parallel do
25 if (l) call abort 25 if (l) STOP 1
26 end program collapse1 26 end program collapse1