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-exception 10// 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_STDCALL 19 "yes"; 20#else 21 "no"; 22#endif 23 24#ifdef USE_FTN_STDCALL 25 26#define FTN_STDCALL KMP_STDCALL 27#define KMP_FTN_ENTRIES USE_FTN_STDCALL 28 29#include "kmp_ftn_entry.h" 30#include "kmp_ftn_os.h" 31 32#endif /* USE_FTN_STDCALL */ 33