------- Comment #1 from burnus at gcc dot gnu dot org 2008-03-04 20:26 ------- I think this is invalid if I read "2.1.2 Free Source Form Directives" in http://www.openmp.org/mp-documents/spec25.pdf correctly.
I think it should be: !$OMP PARALLEL DO DEFAULT(PRIVATE) SHARED(I,& !$OMP J) instead of !$OMP PARALLEL DO DEFAULT(PRIVATE) SHARED(I,& !$ J) As "OMP PARALLEL" is a directive. For conditional compilation "!$" (2.2.1) can be used, but I think it does not apply here. Jakub, am I right or do I miss something? -- burnus at gcc dot gnu dot org changed: What |Removed |Added ---------------------------------------------------------------------------- CC| |jakub at redhat dot com Keywords| |openmp http://gcc.gnu.org/bugzilla/show_bug.cgi?id=35461