------- Comment #3 from dominiq at lps dot ens dot fr 2008-10-16 13:17 ------- gfortran 4.3.2 and 4.4.0 give the following error:
pr37848.f90:32.23: !$OMP PRIVATE(l,ni,M,N) 1 Error: Object 'g_junct' is not a variable at (1) The program compiles (and executes) after removing 'g_junct' from "!$OMP SHARED(g_alpha,g_ndim, g_junct) &". -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=37848