https://gcc.gnu.org/bugzilla/show_bug.cgi?id=92756
--- Comment #4 from Jakub Jelinek <jakub at gcc dot gnu.org> --- Author: jakub Date: Wed Dec 4 08:47:13 2019 New Revision: 278956 URL: https://gcc.gnu.org/viewcvs?rev=278956&root=gcc&view=rev Log: PR fortran/92756 * trans-openmp.c (gfc_trans_omp_teams): Wrap OMP_TEAMS body into a BIND_EXPR with a forced BLOCK. * gfortran.dg/gomp/teams1.f90: New test. * testsuite/libgomp.fortran/teams1.f90: New test. * testsuite/libgomp.fortran/teams2.f90: New test. Added: trunk/gcc/testsuite/gfortran.dg/gomp/teams1.f90 trunk/libgomp/testsuite/libgomp.fortran/teams1.f90 trunk/libgomp/testsuite/libgomp.fortran/teams2.f90 Modified: trunk/gcc/fortran/ChangeLog trunk/gcc/fortran/trans-openmp.c trunk/gcc/testsuite/ChangeLog trunk/libgomp/ChangeLog