LLVM OpenMP* Runtime Library
src
kmp_ftn_extra.cpp
1
/*
2
* kmp_ftn_extra.cpp -- Fortran 'extra' linkage support for OpenMP.
3
*/
4
5
//===----------------------------------------------------------------------===//
6
//
7
// The LLVM Compiler Infrastructure
8
//
9
// This file is dual licensed under the MIT and the University of Illinois Open
10
// Source Licenses. See LICENSE.txt for details.
11
//
12
//===----------------------------------------------------------------------===//
13
14
#include "kmp.h"
15
#include "kmp_affinity.h"
16
17
#if KMP_OS_WINDOWS
18
#define KMP_FTN_ENTRIES KMP_FTN_PLAIN
19
#elif KMP_OS_UNIX
20
#define KMP_FTN_ENTRIES KMP_FTN_APPEND
21
#endif
22
23
// Note: This string is not printed when KMP_VERSION=1.
24
char
const
__kmp_version_ftnextra[] =
25
KMP_VERSION_PREFIX
"Fortran \"extra\" OMP support: "
26
#ifdef KMP_FTN_ENTRIES
27
"yes"
;
28
#define FTN_STDCALL
/* nothing to do */
29
#include "kmp_ftn_os.h"
30
#include "kmp_ftn_entry.h"
31
#else
32
"no"
;
33
#endif
/* KMP_FTN_ENTRIES */
Generated by
1.8.13