i386: Add OPTION_MASK_ISA2_EVEX512 for some AVX512 instructions.
[official-gcc.git] / libgomp / testsuite / libgomp.fortran / pr28390.f
blob9a0832a59bb4c36fd818592b99270b1b2e7aa179
1 ! { dg-do run }
2 ! PR fortran/28390
3 program pr28390
4 integer i
5 !$omp parallel do lastprivate(i)
6 do i=1,100
7 end do
8 if (i.ne.101) stop 1
9 end