33 lines · cpp
1/*2 * kmp_ftn_stdcall.cpp -- Fortran __stdcall linkage support for OpenMP.3 */4 5//===----------------------------------------------------------------------===//6//7// Part of the LLVM Project, under the Apache License v2.0 with LLVM Exceptions.8// See https://llvm.org/LICENSE.txt for license information.9// SPDX-License-Identifier: Apache-2.0 WITH LLVM-exception10//11//===----------------------------------------------------------------------===//12 13#include "kmp.h"14 15// Note: This string is not printed when KMP_VERSION=1.16char const __kmp_version_ftnstdcall[] =17 KMP_VERSION_PREFIX "Fortran __stdcall OMP support: "18#ifdef USE_FTN_STDCALL19 "yes";20#else21 "no";22#endif23 24#ifdef USE_FTN_STDCALL25 26#define FTN_STDCALL KMP_STDCALL27#define KMP_FTN_ENTRIES USE_FTN_STDCALL28 29#include "kmp_ftn_entry.h"30#include "kmp_ftn_os.h"31 32#endif /* USE_FTN_STDCALL */33