LLVM OpenMP* Runtime Library
src
kmp_ftn_stdcall.c
1
/*
2
* kmp_ftn_stdcall.c -- Fortran __stdcall linkage support for OpenMP.
3
*/
4
5
6
//===----------------------------------------------------------------------===//
7
//
8
// The LLVM Compiler Infrastructure
9
//
10
// This file is dual licensed under the MIT and the University of Illinois Open
11
// Source Licenses. See LICENSE.txt for details.
12
//
13
//===----------------------------------------------------------------------===//
14
15
16
#include "kmp.h"
17
18
// Note: This string is not printed when KMP_VERSION=1.
19
char
const
__kmp_version_ftnstdcall[] = KMP_VERSION_PREFIX
"Fortran __stdcall OMP support: "
20
#ifdef USE_FTN_STDCALL
21
"yes"
;
22
#else
23
"no"
;
24
#endif
25
26
#ifdef USE_FTN_STDCALL
27
28
#define FTN_STDCALL KMP_STDCALL
29
#define KMP_FTN_ENTRIES USE_FTN_STDCALL
30
31
#include "kmp_ftn_os.h"
32
#include "kmp_ftn_entry.h"
33
34
#endif
/* USE_FTN_STDCALL */
35
Generated by
1.8.12