my_module_.c 315 B

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