]> git.ipfire.org Git - thirdparty/gcc.git/commit
Fix openmp global state fortran regression
authormikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 19 Jun 2015 12:50:00 +0000 (12:50 +0000)
committermikael <mikael@138bc75d-0d04-0410-961f-82ee72b054a4>
Fri, 19 Jun 2015 12:50:00 +0000 (12:50 +0000)
commitf1c53664adf013f2ad2105fe28a40e871a4f136c
treec2b9734d7e03d872604656f71cb305cb1698f759
parent5258a4c42424782490a21b57af12f6f1dab815d2
Fix openmp global state fortran regression

PR fortran/66549
gcc/fortran/
* resolve.c (resolve_global_procedure): Don't save and restore
OpenMP state around the call to gfc_resolve.
(gfc_resolve): Save OpenMP state on entry and restore it on return.
gcc/testsuite/
* gfortran.dg/gomp/omp_parallel_1.f90: New file.

git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@224648 138bc75d-0d04-0410-961f-82ee72b054a4
gcc/fortran/ChangeLog
gcc/fortran/resolve.c
gcc/testsuite/ChangeLog
gcc/testsuite/gfortran.dg/gomp/omp_parallel_1.f90 [new file with mode: 0644]