aboutsummaryrefslogtreecommitdiffstats
path: root/erts/include/internal/ethread_inline.h
blob: c09a67619a72ed2cb7c90a9fcc782e56cb4c39ab (plain) (blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
/*
 * %CopyrightBegin%
 *
 * Copyright Ericsson AB 2004-2014. All Rights Reserved.
 *
 * The contents of this file are subject to the Erlang Public License,
 * Version 1.1, (the "License"); you may not use this file except in
 * compliance with the License. You should have received a copy of the
 * Erlang Public License along with this software. If not, it can be
 * retrieved online at http://www.erlang.org/.
 *
 * Software distributed under the License is distributed on an "AS IS"
 * basis, WITHOUT WARRANTY OF ANY KIND, either express or implied. See
 * the License for the specific language governing rights and limitations
 * under the License.
 *
 * %CopyrightEnd%
 */

#ifndef ETHREAD_INLINE_H__
#define ETHREAD_INLINE_H__

#define ETHR_GCC_COMPILER_FALSE 0 /* Not a gcc compatible compiler */
#define ETHR_GCC_COMPILER_TRUE 1 /* The GNU gcc compiler */
/* Negative integers for gcc compatible compilers */
#define ETHR_GCC_COMPILER_CLANG -1 /* The Clang gcc compatible compiler */
#define ETHR_GCC_COMPILER_ICC -2 /* The Intel gcc compatible compiler */
/* Line them up... */

/*
 * Unfortunately there is no easy and certain way of
 * detecting a true gcc compiler, since the compatible
 * ones all define the same defines as the true gnu-gcc...
 */
#if !defined(__GNUC__) && !defined(__GNUG__) 
#  define ETHR_GCC_COMPILER ETHR_GCC_COMPILER_FALSE
#elif defined(__clang__)
#  define ETHR_GCC_COMPILER ETHR_GCC_COMPILER_CLANG
#elif defined(__ICC) || defined(__INTEL_COMPILER)
#  define ETHR_GCC_COMPILER ETHR_GCC_COMPILER_ICC
#else
/* Seems to be the true gnu-gcc... */
#  define ETHR_GCC_COMPILER ETHR_GCC_COMPILER_TRUE
#endif

#if !defined(__GNUC__)
#  define ETHR_AT_LEAST_GCC_VSN__(MAJ, MIN, PL) 0
#elif !defined(__GNUC_MINOR__)
#  define ETHR_AT_LEAST_GCC_VSN__(MAJ, MIN, PL) \
  ((__GNUC__ << 24) >= (((MAJ) << 24) | ((MIN) << 12) | (PL)))
#elif !defined(__GNUC_PATCHLEVEL__)
#  define ETHR_AT_LEAST_GCC_VSN__(MAJ, MIN, PL) \
  (((__GNUC__ << 24) | (__GNUC_MINOR__ << 12)) >= (((MAJ) << 24) | ((MIN) << 12) | (PL)))
#else
#  define ETHR_AT_LEAST_GCC_VSN__(MAJ, MIN, PL) \
  (((__GNUC__ << 24) | (__GNUC_MINOR__ << 12) | __GNUC_PATCHLEVEL__) >= (((MAJ) << 24) | ((MIN) << 12) | (PL)))
#endif

#undef ETHR_INLINE
#if defined(__GNUC__)
#  define ETHR_INLINE __inline__
#  if ETHR_AT_LEAST_GCC_VSN__(3, 1, 1)
#    define ETHR_FORCE_INLINE __inline__ __attribute__((__always_inline__))
#  else
#    define ETHR_FORCE_INLINE __inline__
#  endif
#elif defined(__WIN32__)
#  define ETHR_INLINE __forceinline
#  define ETHR_FORCE_INLINE __forceinline
#endif

#endif /* #ifndef ETHREAD_INLINE_H__ */