Re: Implementing OpenACC's Fortran module

[James Norris <jnorris at codesourcery dot com>]

Tobias,

On 07/26/2014 01:41 PM, Tobias Burnus wrote:
> Hi Thomas, dear all,
>
> attached is a draft version of openacc_lib.h and openacc.f90. See TODO 
> for the missing bits. Note that the "openacc.f90" code produces both a 
> module file (.mod) and object code, which has to be linked into the 
> library. Those stub functions should call the C version of the 
> function.Those files require my trunk patch r213079 of today.
>
> Please review - it is simple to make copy'n'paste mistakes. Otherwise, 
> how does it look like?
>
> Tobias

Attached is my working version of openacc.f90. It is based on the 
version you distributed
with some changes pertaining to the C binding of variables. I've also 
done a couple of things
on your 'TODO' list. Some preliminary testing of the code has been 
performed, however,
there is still more testing to be done.

With regard to the file openacc_lib.h, I felt the intention of this file 
was to provide interfaces
for legacy / 'dusty deck' Fortran, i.e., Fortran 77. Since the 'use' 
statement was made available
in Fortran 90, the file openacc.f90 would be the preferred file / method 
for accessing the
OpenACC interfaces. However, a means was still needed for Fortran 
versions prior to Fortran
90. Therefore, openacc_lib.h would provide those interfaces, albeit a 
subset of the entire set
of the available interfaces given the limitations of Fortran 77.

Make sense?
Jim

Attachment: openacc.f90
Description: Text document