3.9 Fortran Issues

The following apply to Fortran only.

3.9.1 THREADPRIVATE Directive

If the conditions for values of data in the threadprivate objects of threads (other than the initial thread) to persist between two consecutive active parallel regions do not all hold, then the allocation status of an allocatable array in the second region might be "not currently allocated".

3.9.2 SHARED Clause

Passing a shared variable to a non-intrinsic procedure may result in the value of the shared variable being copied into temporary storage before the procedure reference, and back out of the temporary storage into the actual argument storage after the procedure reference. This copying into and out of temporary storage can occur only if conditions a, b, and c in OpenMP 3.0 Specification, section 2.9.3.2 page 88, hold, namely:

• The actual argument is one of the following:

  • A shared variable

  • A subobject of a shared variable

  • An object associated with a shared variable

  • An object associated with a subobject of a shared variable

• The actual argument is also one of the following:

  • An array section

  • An array section with a vector subscript

  • An assumed-shape array

  • A pointer array

• The associated dummy argument for this actual argument is an explicit-shape array or an assumed-size array.

3.9.3 Runtime Library Definitions

Both the include file omp_lib.h and the module file omp_lib are provided in the implementation.

On Solaris platforms, the OpenMP runtime library routines that take an argument are extended with a generic interface so arguments of different Fortran KIND types can be accommodated.