https://gcc.gnu.org/bugzilla/show_bug.cgi?id=90539
--- Comment #23 from Martin Liška <marxin at gcc dot gnu.org> ---
(In reply to Thomas Koenig from comment #21)
> OK, if the callee is a C function... what is its declaration
> on the Fortran side? Is there any interface, bind(c) or otherwise?
>
> I suppose there must be something, otherwise nf_put_vara_double would
> have a trailing underscore.
>
> On the caller side, I see that an array is passed, but the fsym
> has rank=0. I think this would be flagged otherwise.
So ncfortran.h contains:
#define nf_put_vara_double nf_put_vara_double_
And Fortran interface is defined in netcdf/include/netcdf.inc:
integer nf_put_vara_double
! (integer ncid,
! integer varid,
! integer start(1),
! integer count(1),
! doubleprecision dvals(1))
external nf_put_vara_double
