Mercurial > hg > CbC > CbC_gcc

comparison libgomp/testsuite/libgomp.fortran/sharing1.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
23 j = 25 23 j = 25
24 end if 24 end if
25 !$omp barrier 25 !$omp barrier
26 if (j .ne. 25 .or. i .ne. (k * 10 + 14)) l = .true. 26 if (j .ne. 25 .or. i .ne. (k * 10 + 14)) l = .true.
27 !$omp end parallel 27 !$omp end parallel
28 if (l .or. j .ne. 25) call abort 28 if (l .or. j .ne. 25) STOP 1
29 end 29 end