------- Comment #1 from dfranke at gcc dot gnu dot org  2007-06-29 21:28 -------
Seems to be fixed in trunk:

$> gfortran-svn -g -Wall -fopenmp pr32551.f90  && ./a.out
 omp_get_nested()= F
           2           2           2           2

$> gfortran-svn -v
gcc version 4.3.0 20070628 (experimental)

As I am not 100% sure whether I fully understand your testcase (e.g. why expect
2 as a result, not somethinig from 2-5, depending on the thread hitting the
innermost parallel-region first?), I won't close it yet. Maybe Jakub has
something to say on this?!


-- 

dfranke at gcc dot gnu dot org changed:

           What    |Removed                     |Added
----------------------------------------------------------------------------
                 CC|                            |dfranke at gcc dot gnu dot
                   |                            |org, jakub at gcc dot gnu
                   |                            |dot org
  GCC build triplet|x86_64-suse-linux           |
   GCC host triplet|x86_64-suse-linux           |
 GCC target triplet|x86_64-suse-linux           |
           Keywords|                            |openmp
            Summary|INCORRECT OUTPUT OBTAINED   |incorrect output obtained
                   |FROM NESTED PARALLELISM THAT|from nested parallelism that
                   |IS SERIALIZED               |is serialized
   Target Milestone|---                         |4.3.0


http://gcc.gnu.org/bugzilla/show_bug.cgi?id=32551

Reply via email to