comparison libgomp/testsuite/libgomp.fortran/pr28390.f @ 0:a06113de4d67

first commit
author kent <kent@cr.ie.u-ryukyu.ac.jp>
date Fri, 17 Jul 2009 14:47:48 +0900
parents
children 84e7813d76e9
comparison
equal deleted inserted replaced
-1:000000000000 0:a06113de4d67
1 ! PR fortran/28390
2 program pr28390
3 integer i
4 !$omp parallel do lastprivate(i)
5 do i=1,100
6 end do
7 if (i.ne.101) call abort
8 end