gcc-reflection/libgomp/testsuite/libgomp.fortran/pr28390.f at reflection - gcc-reflection - Gitea: Git with a cup of tea

KJ16609/gcc-reflection

mirror of https://forge.sourceware.org/marek/gcc.git synced 2026-02-22 03:47:02 -05:00

Files

Tobias Burnus c425e66b27 libgomp/testsuite – use 'stop'

libgomp/
	* testsuite/libgomp.fortran/: Replace 'STOP' by 'stop'.

From-SVN: r277609

2019-10-30 12:44:54 +01:00

10 lines

173 B

Fortran

Raw Permalink Blame History

 ! { dg-do run }
 ! PR fortran/28390
       program pr28390
       integer i
 !$omp parallel do lastprivate(i)
       do i=1,100
       end do
       if (i.ne.101) stop 1
       end