On 02/01/2014 03:12 PM, Jeff Squyres (jsquyres) wrote:
>> I think that ompi_funloc_variant1 needs to do IMPORT to have access to the callback_variant1 definition before using it to define "FN"
>> function ompi_funloc_variant1(fn)
>> use, intrinsic :: iso_c_binding, only: c_funptr
>> procedure(callback_variant1) :: fn
At work reading the specs it is clear that it needs the IMPORT clause.
Could probably do IMPORT :: callback_variant1 if you want to import as
little as possible.
Ake Sandgren, HPC2N, Umea University, S-90187 Umea, Sweden
Internet: ake_at_[hidden] Phone: +46 90 7866134 Fax: +46 90 7866126
Mobile: +46 70 7716134 WWW: http://www.hpc2n.umu.se