------- Comment #7 from longb at cray dot com 2010-05-12 14:34 ------- For what it's worth, the Cray compiler produces this message for the test code:
!$OMP shared (a,n,f) ^ ftn-1473 crayftn: ERROR DP, File = test.f90, Line = 13, Column = 19 Object F must be a variable to be in the SHARED clause of the PARALLEL directive. Regarding Fortran terminology, a procedure pointer is a procedure, not a variable. The definition for "procedure pointer" is "procedure with the EXTERNAL and POINTER attributes". -- http://gcc.gnu.org/bugzilla/show_bug.cgi?id=44036