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
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
|
#ifndef INTERNAL_COMPILERS_H /* -*- C -*- */
#define INTERNAL_COMPILERS_H
/**
* @file
* @brief Internal header absorbing C compipler differences.
* @author \@shyouhei
* @copyright This file is a part of the programming language Ruby.
* Permission is hereby granted, to either redistribute and/or
* modify this file, provided that the conditions mentioned in the
* file COPYING are met. Consult the file for details.
*/
#include "ruby/defines.h" /* for GCC_VERSION_SINCE */
#ifdef _MSC_VER
# define MSC_VERSION_SINCE(_) (_MSC_VER >= _)
# define MSC_VERSION_BEFORE(_) (_MSC_VER < _)
#else
# define MSC_VERSION_SINCE(_) 0
# define MSC_VERSION_BEFORE(_) 0
#endif
#ifndef __has_attribute
# define __has_attribute(...) __has_attribute_##__VA_ARGS__
# /* GCC <= 4 lacks __has_attribute predefined macro, while has attributes
# * themselves. We can simulate the macro like the following: */
# define __has_attribute_aligned GCC_VERSION_SINCE(0, 0, 0)
# define __has_attribute_alloc_size GCC_VERSION_SINCE(4, 3, 0)
# define __has_attribute_artificial GCC_VERSION_SINCE(4, 3, 0)
# define __has_attribute_always_inline GCC_VERSION_SINCE(3, 1, 0)
# define __has_attribute_cdecl GCC_VERSION_SINCE(0, 0, 0)
# define __has_attribute_cold GCC_VERSION_SINCE(4, 3, 0)
# define __has_attribute_const GCC_VERSION_SINCE(2, 6, 0)
# define __has_attribute_deprecated GCC_VERSION_SINCE(3, 1, 0)
# define __has_attribute_dllexport GCC_VERSION_SINCE(0, 0, 0)
# define __has_attribute_dllimport GCC_VERSION_SINCE(0, 0, 0)
# define __has_attribute_error GCC_VERSION_SINCE(4, 3, 0)
# define __has_attribute_format GCC_VERSION_SINCE(0, 0, 0)
# define __has_attribute_hot GCC_VERSION_SINCE(4, 3, 0)
# define __has_attribute_leaf GCC_VERSION_SINCE(4, 6, 0)
# define __has_attribute_malloc GCC_VERSION_SINCE(3, 0, 0)
# define __has_attribute_no_address_safety_analysis GCC_VERSION_SINCE(4, 8, 0)
# define __has_attribute_no_sanitize_address GCC_VERSION_SINCE(4, 8, 0)
# define __has_attribute_no_sanitize_undefined GCC_VERSION_SINCE(4, 9, 0)
# define __has_attribute_noinline GCC_VERSION_SINCE(3, 1, 0)
# define __has_attribute_nonnull GCC_VERSION_SINCE(3, 3, 0)
# define __has_attribute_noreturn GCC_VERSION_SINCE(2, 5, 0)
# define __has_attribute_nothrow GCC_VERSION_SINCE(3, 3, 0)
# define __has_attribute_pure GCC_VERSION_SINCE(2, 96, 0)
# define __has_attribute_returns_nonnull GCC_VERSION_SINCE(4, 9, 0)
# define __has_attribute_returns_twice GCC_VERSION_SINCE(4, 1, 0)
# define __has_attribute_stdcall GCC_VERSION_SINCE(0, 0, 0)
# define __has_attribute_unused GCC_VERSION_SINCE(0, 0, 0)
# define __has_attribute_visibility GCC_VERSION_SINCE(3, 3, 0)
# define __has_attribute_visibility GCC_VERSION_SINCE(3, 3, 0)
# define __has_attribute_warn_unused_result GCC_VERSION_SINCE(3, 4, 0)
# define __has_attribute_warning GCC_VERSION_SINCE(4, 3, 0)
# define __has_attribute_weak GCC_VERSION_SINCE(0, 0, 0)
# /* Note that 0,0,0 might be inaccurate. */
#endif
#ifndef __has_c_attribute
# /* As of writing everything that lacks __has_c_attribute also completely
# * lacks C2x attributes as well. Might change in future? */
# define __has_c_attribute(...) 0
#endif
#ifndef __has_declspec_attribute
# define __has_declspec_attribute(...) __has_declspec_attribute_##__VA_ARGS__
# define __has_declspec_attribute_align MSC_VERSION_SINCE( 800)
# define __has_declspec_attribute_deprecated MSC_VERSION_SINCE(1300)
# define __has_declspec_attribute_dllexport MSC_VERSION_SINCE( 800)
# define __has_declspec_attribute_dllimport MSC_VERSION_SINCE( 800)
# define __has_declspec_attribute_noalias MSC_VERSION_SINCE( 800)
# define __has_declspec_attribute_noinline MSC_VERSION_SINCE(1300)
# define __has_declspec_attribute_noreturn MSC_VERSION_SINCE(1100)
# define __has_declspec_attribute_nothrow MSC_VERSION_SINCE( 800)
# define __has_declspec_attribute_restrict MSC_VERSION_SINCE( 800)
# /* Note that 800 might be inaccurate. */
#endif
#ifndef __has_builtin
# /* :FIXME: Historically GCC has had tons of builtins, but it implemented
# * __has_builtin only since GCC 10. This section can be made more
# * granular. */
# /* https://gcc.gnu.org/bugzilla/show_bug.cgi?id=66970 */
# define __has_builtin(...) __has_builtin_##__VA_ARGS__
# define __has_builtin____builtin_add_overflow GCC_VERSION_SINCE(5, 1, 0)
# define __has_builtin____builtin_bswap16 GCC_VERSION_SINCE(4, 8, 0) /* http://gcc.gnu.org/bugzilla/show_bug.cgi?id=52624 */
# define __has_builtin____builtin_bswap32 GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_bswap64 GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_clz GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_clzl GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_clzll GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_constant_p GCC_VERSION_SINCE(2,95, 3)
# define __has_builtin____builtin_ctz GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_ctzl GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_ctzll GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_mul_overflow GCC_VERSION_SINCE(5, 1, 0)
# define __has_builtin____builtin_mul_overflow_p GCC_VERSION_SINCE(7, 0, 0)
# define __has_builtin____builtin_popcount GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_popcountl GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_popcountll GCC_VERSION_SINCE(3, 6, 0)
# define __has_builtin____builtin_sub_overflow GCC_VERSION_SINCE(5, 1, 0)
# /* Take config.h definition when available */
# ifdef HAVE_BUILTIN____BUILTIN_ADD_OVERFLOW
# undef __has_builtin____builtin_add_overflow
# define __has_builtin____builtin_add_overflow HAVE_BUILTIN____BUILTIN_ADD_OVERFLOW
# endif
# ifdef HAVE_BUILTIN____BUILTIN_BSWAP16
# undef __has_builtin____builtin_bswap16
# define __has_builtin____builtin_bswap16 HAVE_BUILTIN____BUILTIN_BSWAP16
# endif
# ifdef HAVE_BUILTIN____BUILTIN_BSWAP32
# undef __has_builtin____builtin_bswap32
# define __has_builtin____builtin_bswap16 HAVE_BUILTIN____BUILTIN_BSWAP32
# endif
# ifdef HAVE_BUILTIN____BUILTIN_BSWAP64
# undef __has_builtin____builtin_bswap64
# define __has_builtin____builtin_bswap64 HAVE_BUILTIN____BUILTIN_BSWAP64
# endif
# ifdef HAVE_BUILTIN____BUILTIN_CLZ
# undef __has_builtin____builtin_clz
# define __has_builtin____builtin_clz HAVE_BUILTIN____BUILTIN_CLZ
# endif
# ifdef HAVE_BUILTIN____BUILTIN_CLZL
# undef __has_builtin____builtin_clzl
# define __has_builtin____builtin_clzl HAVE_BUILTIN____BUILTIN_CLZL
# endif
# ifdef HAVE_BUILTIN____BUILTIN_CLZLL
# undef __has_builtin____builtin_clzll
# define __has_builtin____builtin_clzll HAVE_BUILTIN____BUILTIN_CLZLL
# endif
# ifdef HAVE_BUILTIN____BUILTIN_CONSTANT_P
# undef __has_builtin____builtin_constant_p
# define __has_builtin____builtin_constant_p HAVE_BUILTIN____BUILTIN_CONSTANT_P
# endif
# ifdef HAVE_BUILTIN____BUILTIN_CTZ
# undef __has_builtin____builtin_ctz
# define __has_builtin____builtin_ctz HAVE_BUILTIN____BUILTIN_CTZ
# endif
# ifdef HAVE_BUILTIN____BUILTIN_CTZL
# undef __has_builtin____builtin_ctzl
# define __has_builtin____builtin_ctzl HAVE_BUILTIN____BUILTIN_CTZL
# endif
# ifdef HAVE_BUILTIN____BUILTIN_CTZLL
# undef __has_builtin____builtin_ctzll
# define __has_builtin____builtin_ctzll HAVE_BUILTIN____BUILTIN_CTZLL
# endif
# ifdef HAVE_BUILTIN____BUILTIN_MUL_OVERFLOW
# undef __has_builtin____builtin_mul_overflow
# define __has_builtin____builtin_mul_overflow HAVE_BUILTIN____BUILTIN_MUL_OVERFLOW
# endif
# ifdef HAVE_BUILTIN____BUILTIN_MUL_OVERFLOW_P
# undef __has_builtin____builtin_mul_overflow_p
# define __has_builtin____builtin_mul_overflow_p HAVE_BUILTIN____BUILTIN_MUL_OVERFLOW_P
# endif
# ifdef HAVE_BUILTIN____BUILTIN_POPCOUNT
# undef __has_builtin____builtin_popcount
# define __has_builtin____builtin_popcount HAVE_BUILTIN____BUILTIN_POPCOUNT
# endif
# ifdef HAVE_BUILTIN____BUILTIN_POPCOUNTL
# undef __has_builtin____builtin_popcountl
# define __has_builtin____builtin_popcountl HAVE_BUILTIN____BUILTIN_POPCOUNTL
# endif
# ifdef HAVE_BUILTIN____BUILTIN_POPCOUNTLL
# undef __has_builtin____builtin_popcountll
# define __has_builtin____builtin_popcountll HAVE_BUILTIN____BUILTIN_POPCOUNTLL
# endif
# ifdef HAVE_BUILTIN____BUILTIN_SUB_OVERFLOW
# undef __has_builtin____builtin_SUB_overflow
# define __has_builtin____builtin_sub_overflow HAVE_BUILTIN____BUILTIN_SUB_OVERFLOW
# endif
#endif
#ifndef __has_feature
# define __has_feature(...) 0
#endif
#ifndef __has_extension
# /* Pre-3.0 clang had __has_feature but not __has_extension. */
# define __has_extension __has_feature
#endif
#ifndef __has_warning
# /* We cannot simulate __has_warning like the ones above, because it takes
# * string liteals (we can stringize a macro arugment but there is no such
# * thing like an unquote of strrings). */
# define __has_warning(...) 0
#endif
#ifndef __GNUC__
# define __extension__ /* void */
#endif
#ifndef MAYBE_UNUSED
# define MAYBE_UNUSED(x) x
#endif
#ifndef WARN_UNUSED_RESULT
# define WARN_UNUSED_RESULT(x) x
#endif
#define RB_OBJ_BUILTIN_TYPE(obj) rb_obj_builtin_type(obj)
#define OBJ_BUILTIN_TYPE(obj) RB_OBJ_BUILTIN_TYPE(obj)
#ifdef __GNUC__
#define rb_obj_builtin_type(obj) \
__extension__({ \
VALUE arg_obj = (obj); \
RB_SPECIAL_CONST_P(arg_obj) ? -1 : \
RB_BUILTIN_TYPE(arg_obj); \
})
#else
# include "ruby/ruby.h"
static inline int
rb_obj_builtin_type(VALUE obj)
{
return RB_SPECIAL_CONST_P(obj) ? -1 :
RB_BUILTIN_TYPE(obj);
}
#endif
/* A macro for defining a flexible array, like: VALUE ary[FLEX_ARY_LEN]; */
#if defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L)
# define FLEX_ARY_LEN /* VALUE ary[]; */
#elif defined(__GNUC__) && !defined(__STRICT_ANSI__)
# define FLEX_ARY_LEN 0 /* VALUE ary[0]; */
#else
# define FLEX_ARY_LEN 1 /* VALUE ary[1]; */
#endif
/*
* For declaring bitfields out of non-unsigned int types:
* struct date {
* BITFIELD(enum months, month, 4);
* ...
* };
*/
#if defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L)
# define BITFIELD(type, name, size) type name : size
#else
# define BITFIELD(type, name, size) unsigned int name : size
#endif
#endif /* INTERNAL_COMPILERS_H */
|
