12345678910111213141516171819202122232425262728293031323334 |
- /*
- * kmp_ftn_cdecl.cpp -- Fortran __cdecl linkage support for OpenMP.
- */
- //===----------------------------------------------------------------------===//
- //
- // Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.
- // See https://llvm.org/LICENSE.txt for license information.
- // SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception
- //
- //===----------------------------------------------------------------------===//
- #include "kmp.h"
- #include "kmp_affinity.h"
- #if KMP_OS_WINDOWS
- #if defined KMP_WIN_CDECL || !KMP_DYNAMIC_LIB
- #define KMP_FTN_ENTRIES KMP_FTN_UPPER
- #endif
- #elif KMP_OS_UNIX
- #define KMP_FTN_ENTRIES KMP_FTN_PLAIN
- #endif
- // Note: This string is not printed when KMP_VERSION=1.
- char const __kmp_version_ftncdecl[] =
- KMP_VERSION_PREFIX "Fortran __cdecl OMP support: "
- #ifdef KMP_FTN_ENTRIES
- "yes";
- #define FTN_STDCALL /* no stdcall */
- #include "kmp_ftn_os.h"
- #include "kmp_ftn_entry.h"
- #else
- "no";
- #endif /* KMP_FTN_ENTRIES */
|