1234567891011121314151617181920212223242526272829303132 |
- #include "kmp.h"
- #include "kmp_affinity.h"
- #if KMP_OS_WINDOWS
- #define KMP_FTN_ENTRIES KMP_FTN_PLAIN
- #elif KMP_OS_UNIX
- #define KMP_FTN_ENTRIES KMP_FTN_APPEND
- #endif
- char const __kmp_version_ftnextra[] =
- KMP_VERSION_PREFIX "Fortran \"extra\" OMP support: "
- #ifdef KMP_FTN_ENTRIES
- "yes";
- #define FTN_STDCALL
- #include "kmp_ftn_os.h"
- #include "kmp_ftn_entry.h"
- #else
- "no";
- #endif
|