blob: 364b21460e92d87b44dfb7d3560e5ce2c0cd24d2 (
plain)
1
2
3
4
5
6
7
8
|
#if defined(__PATHSCALE__)
/* PathScale Fortran wants my_module_ when calling any my_module symbol,
but module symbols use '.in.' so we cannot provide them anyway. */
void pathscale_my_module_(void) {}
#else
/* PGI Fortran wants my_module_ when calling any my_module symbol. */
void my_module_(void) {}
#endif
|
