Mercurial > embed
annotate duktape/duk_config.h @ 14:9acbab647d05
duktape: upgrade to 1.5.0
| author | David Demelier <markand@malikania.fr> |
|---|---|
| date | Sun, 08 May 2016 10:52:04 +0200 |
| parents | 543b0653ea27 |
| children | 12bf6de5b67a |
| rev | line source |
|---|---|
| 3 | 1 /* |
| 2 * duk_config.h configuration header generated by genconfig.py. | |
| 3 * | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
4 * Git commit: 83d557704ee63f68ab40b6fcb00995c9b3d6777c |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
5 * Git describe: v1.5.0 |
| 3 | 6 * Git branch: master |
| 7 * | |
| 8 * Supported platforms: | |
| 9 * - Mac OSX, iPhone, Darwin | |
| 10 * - OpenBSD | |
| 11 * - Generic BSD | |
| 12 * - Atari ST TOS | |
| 13 * - AmigaOS | |
| 14 * - Windows | |
| 15 * - Flashplayer (Crossbridge) | |
| 16 * - QNX | |
| 17 * - TI-Nspire | |
| 18 * - Emscripten | |
| 19 * - Linux | |
| 20 * - Solaris | |
| 21 * - Generic POSIX | |
| 22 * - Cygwin | |
| 23 * - Generic UNIX | |
| 24 * - Generic fallback | |
| 25 * | |
| 26 * Supported architectures: | |
| 27 * - x86 | |
| 28 * - x64 | |
| 29 * - x32 | |
| 30 * - ARM 32-bit | |
| 31 * - ARM 64-bit | |
| 32 * - MIPS 32-bit | |
| 33 * - MIPS 64-bit | |
| 34 * - PowerPC 32-bit | |
| 35 * - PowerPC 64-bit | |
| 36 * - SPARC 32-bit | |
| 37 * - SPARC 64-bit | |
| 38 * - SuperH | |
| 39 * - Motorola 68k | |
| 40 * - Emscripten | |
| 41 * - Generic | |
| 42 * | |
| 43 * Supported compilers: | |
| 44 * - Clang | |
| 45 * - GCC | |
| 46 * - MSVC | |
| 47 * - Emscripten | |
| 48 * - TinyC | |
| 49 * - VBCC | |
| 50 * - Bruce's C compiler | |
| 51 * - Generic | |
| 52 * | |
| 53 */ | |
| 54 | |
| 55 #if !defined(DUK_CONFIG_H_INCLUDED) | |
| 56 #define DUK_CONFIG_H_INCLUDED | |
| 57 | |
| 58 /* | |
| 59 * Intermediate helper defines | |
| 60 */ | |
| 61 | |
| 62 /* DLL build detection */ | |
| 63 #if defined(DUK_OPT_DLL_BUILD) | |
| 64 #define DUK_F_DLL_BUILD | |
| 65 #elif defined(DUK_OPT_NO_DLL_BUILD) | |
| 66 #undef DUK_F_DLL_BUILD | |
| 67 #else | |
| 68 /* not configured for DLL build */ | |
| 69 #undef DUK_F_DLL_BUILD | |
| 70 #endif | |
| 71 | |
| 72 /* Apple OSX, iOS */ | |
| 73 #if defined(__APPLE__) | |
| 74 #define DUK_F_APPLE | |
| 75 #endif | |
| 76 | |
| 77 /* OpenBSD */ | |
| 78 #if defined(__OpenBSD__) || defined(__OpenBSD) | |
| 79 #define DUK_F_OPENBSD | |
| 80 #endif | |
| 81 | |
| 82 /* NetBSD */ | |
| 83 #if defined(__NetBSD__) || defined(__NetBSD) | |
| 84 #define DUK_F_NETBSD | |
| 85 #endif | |
| 86 | |
| 87 /* FreeBSD */ | |
| 88 #if defined(__FreeBSD__) || defined(__FreeBSD) | |
| 89 #define DUK_F_FREEBSD | |
| 90 #endif | |
| 91 | |
| 92 /* BSD variant */ | |
| 93 #if defined(DUK_F_FREEBSD) || defined(DUK_F_NETBSD) || defined(DUK_F_OPENBSD) || \ | |
| 94 defined(__bsdi__) || defined(__DragonFly__) | |
| 95 #define DUK_F_BSD | |
| 96 #endif | |
| 97 | |
| 98 /* Atari ST TOS. __TOS__ defined by PureC. No platform define in VBCC | |
| 99 * apparently, so to use with VBCC user must define __TOS__ manually. | |
| 100 */ | |
| 101 #if defined(__TOS__) | |
| 102 #define DUK_F_TOS | |
| 103 #endif | |
| 104 | |
| 105 /* Motorola 68K. Not defined by VBCC, so user must define one of these | |
| 106 * manually when using VBCC. | |
| 107 */ | |
| 108 #if defined(__m68k__) || defined(M68000) || defined(__MC68K__) | |
| 109 #define DUK_F_M68K | |
| 110 #endif | |
| 111 | |
| 112 /* AmigaOS. Neither AMIGA nor __amigaos__ is defined on VBCC, so user must | |
| 113 * define 'AMIGA' manually when using VBCC. | |
| 114 */ | |
| 115 #if defined(AMIGA) || defined(__amigaos__) | |
| 116 #define DUK_F_AMIGAOS | |
| 117 #endif | |
| 118 | |
| 119 /* PowerPC */ | |
| 120 #if defined(__powerpc) || defined(__powerpc__) || defined(__PPC__) | |
| 121 #define DUK_F_PPC | |
| 122 #if defined(__PPC64__) || defined(__LP64__) || defined(_LP64) | |
| 123 #define DUK_F_PPC64 | |
| 124 #else | |
| 125 #define DUK_F_PPC32 | |
| 126 #endif | |
| 127 #endif | |
| 128 | |
| 129 /* Windows, both 32-bit and 64-bit */ | |
| 130 #if defined(_WIN32) || defined(WIN32) || defined(_WIN64) || defined(WIN64) || \ | |
| 131 defined(__WIN32__) || defined(__TOS_WIN__) || defined(__WINDOWS__) | |
| 132 #define DUK_F_WINDOWS | |
| 133 #if defined(_WIN64) || defined(WIN64) | |
| 134 #define DUK_F_WIN64 | |
| 135 #else | |
| 136 #define DUK_F_WIN32 | |
| 137 #endif | |
| 138 #endif | |
| 139 | |
| 140 /* Flash player (e.g. Crossbridge) */ | |
| 141 #if defined(__FLASHPLAYER__) | |
| 142 #define DUK_F_FLASHPLAYER | |
| 143 #endif | |
| 144 | |
| 145 /* QNX */ | |
| 146 #if defined(__QNX__) | |
| 147 #define DUK_F_QNX | |
| 148 #endif | |
| 149 | |
| 150 /* TI-Nspire (using Ndless) */ | |
| 151 #if defined(_TINSPIRE) | |
| 152 #define DUK_F_TINSPIRE | |
| 153 #endif | |
| 154 | |
| 155 /* Emscripten (provided explicitly by user), improve if possible */ | |
| 156 #if defined(EMSCRIPTEN) | |
| 157 #define DUK_F_EMSCRIPTEN | |
| 158 #endif | |
| 159 | |
| 160 /* BCC (Bruce's C compiler): this is a "torture target" for compilation */ | |
| 161 #if defined(__BCC__) || defined(__BCC_VERSION__) | |
| 162 #define DUK_F_BCC | |
| 163 #endif | |
| 164 | |
| 165 /* Linux */ | |
| 166 #if defined(__linux) || defined(__linux__) || defined(linux) | |
| 167 #define DUK_F_LINUX | |
| 168 #endif | |
| 169 | |
| 170 /* illumos / Solaris */ | |
| 171 #if defined(__sun) && defined(__SVR4) | |
| 172 #define DUK_F_SUN | |
| 173 #endif | |
| 174 | |
| 175 /* POSIX */ | |
| 176 #if defined(__posix) | |
| 177 #define DUK_F_POSIX | |
| 178 #endif | |
| 179 | |
| 180 /* Cygwin */ | |
| 181 #if defined(__CYGWIN__) | |
| 182 #define DUK_F_CYGWIN | |
| 183 #endif | |
| 184 | |
| 185 /* Generic Unix (includes Cygwin) */ | |
| 186 #if defined(__unix) || defined(__unix__) || defined(unix) || \ | |
| 187 defined(DUK_F_LINUX) || defined(DUK_F_BSD) | |
| 188 #define DUK_F_UNIX | |
| 189 #endif | |
| 190 | |
| 191 /* stdint.h not available */ | |
| 192 #if defined(DUK_F_WINDOWS) && defined(_MSC_VER) | |
| 193 #if (_MSC_VER < 1700) | |
| 194 /* VS2012+ has stdint.h, < VS2012 does not (but it's available for download). */ | |
| 195 #define DUK_F_NO_STDINT_H | |
| 196 #endif | |
| 197 #endif | |
| 198 #if !defined(DUK_F_NO_STDINT_H) && (defined(DUK_F_TOS) || defined(DUK_F_BCC)) | |
| 199 #define DUK_F_NO_STDINT_H | |
| 200 #endif | |
| 201 | |
| 202 /* C++ */ | |
| 203 #undef DUK_F_CPP | |
| 204 #if defined(__cplusplus) | |
| 205 #define DUK_F_CPP | |
| 206 #endif | |
| 207 | |
| 208 /* Intel x86 (32-bit), x64 (64-bit) or x32 (64-bit but 32-bit pointers), | |
| 209 * define only one of DUK_F_X86, DUK_F_X64, DUK_F_X32. | |
| 210 * https://sites.google.com/site/x32abi/ | |
| 211 */ | |
| 212 #if defined(__amd64__) || defined(__amd64) || \ | |
| 213 defined(__x86_64__) || defined(__x86_64) || \ | |
| 214 defined(_M_X64) || defined(_M_AMD64) | |
| 215 #if defined(__ILP32__) || defined(_ILP32) | |
| 216 #define DUK_F_X32 | |
| 217 #else | |
| 218 #define DUK_F_X64 | |
| 219 #endif | |
| 220 #elif defined(i386) || defined(__i386) || defined(__i386__) || \ | |
| 221 defined(__i486__) || defined(__i586__) || defined(__i686__) || \ | |
| 222 defined(__IA32__) || defined(_M_IX86) || defined(__X86__) || \ | |
| 223 defined(_X86_) || defined(__THW_INTEL__) || defined(__I86__) | |
| 224 #if defined(__LP64__) || defined(_LP64) | |
| 225 /* This should not really happen, but would indicate x64. */ | |
| 226 #define DUK_F_X64 | |
| 227 #else | |
| 228 #define DUK_F_X86 | |
| 229 #endif | |
| 230 #endif | |
| 231 | |
| 232 /* ARM */ | |
| 233 #if defined(__arm__) || defined(__thumb__) || defined(_ARM) || defined(_M_ARM) | |
| 234 #define DUK_F_ARM | |
| 235 #if defined(__LP64__) || defined(_LP64) || defined(__arm64) || defined(__arm64__) | |
| 236 #define DUK_F_ARM64 | |
| 237 #else | |
| 238 #define DUK_F_ARM32 | |
| 239 #endif | |
| 240 #endif | |
| 241 | |
| 242 /* MIPS. Related defines: __MIPSEB__, __MIPSEL__, __mips_isa_rev, __LP64__ */ | |
| 243 #if defined(__mips__) || defined(mips) || defined(_MIPS_ISA) || \ | |
| 244 defined(_R3000) || defined(_R4000) || defined(_R5900) || \ | |
| 245 defined(_MIPS_ISA_MIPS1) || defined(_MIPS_ISA_MIPS2) || \ | |
| 246 defined(_MIPS_ISA_MIPS3) || defined(_MIPS_ISA_MIPS4) || \ | |
| 247 defined(__mips) || defined(__MIPS__) | |
| 248 #define DUK_F_MIPS | |
| 249 #if defined(__LP64__) || defined(_LP64) || defined(__mips64) || \ | |
| 250 defined(__mips64__) || defined(__mips_n64) | |
| 251 #define DUK_F_MIPS64 | |
| 252 #else | |
| 253 #define DUK_F_MIPS32 | |
| 254 #endif | |
| 255 #endif | |
| 256 | |
| 257 /* SPARC */ | |
| 258 #if defined(sparc) || defined(__sparc) || defined(__sparc__) | |
| 259 #define DUK_F_SPARC | |
| 260 #if defined(__LP64__) || defined(_LP64) | |
| 261 #define DUK_F_SPARC64 | |
| 262 #else | |
| 263 #define DUK_F_SPARC32 | |
| 264 #endif | |
| 265 #endif | |
| 266 | |
| 267 /* SuperH */ | |
| 268 #if defined(__sh__) || \ | |
| 269 defined(__sh1__) || defined(__SH1__) || \ | |
| 270 defined(__sh2__) || defined(__SH2__) || \ | |
| 271 defined(__sh3__) || defined(__SH3__) || \ | |
| 272 defined(__sh4__) || defined(__SH4__) || \ | |
| 273 defined(__sh5__) || defined(__SH5__) | |
| 274 #define DUK_F_SUPERH | |
| 275 #endif | |
| 276 | |
| 277 /* Clang */ | |
| 278 #if defined(__clang__) | |
| 279 #define DUK_F_CLANG | |
| 280 #endif | |
| 281 | |
| 282 /* C99 or above */ | |
| 283 #undef DUK_F_C99 | |
| 284 #if defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L) | |
| 285 #define DUK_F_C99 | |
| 286 #endif | |
| 287 | |
| 288 /* C++11 or above */ | |
| 289 #undef DUK_F_CPP11 | |
| 290 #if defined(__cplusplus) && (__cplusplus >= 201103L) | |
| 291 #define DUK_F_CPP11 | |
| 292 #endif | |
| 293 | |
| 294 /* GCC. Clang also defines __GNUC__ so don't detect GCC if using Clang. */ | |
| 295 #if defined(__GNUC__) && !defined(__clang__) && !defined(DUK_F_CLANG) | |
| 296 #define DUK_F_GCC | |
| 297 #if defined(__GNUC__) && defined(__GNUC_MINOR__) && defined(__GNUC_PATCHLEVEL__) | |
| 298 /* Convenience, e.g. gcc 4.5.1 == 40501; http://stackoverflow.com/questions/6031819/emulating-gccs-builtin-unreachable */ | |
| 299 #define DUK_F_GCC_VERSION (__GNUC__ * 10000L + __GNUC_MINOR__ * 100L + __GNUC_PATCHLEVEL__) | |
| 300 #else | |
| 301 #error cannot figure out gcc version | |
| 302 #endif | |
| 303 #endif | |
| 304 | |
| 305 /* MinGW. Also GCC flags (DUK_F_GCC) are enabled now. */ | |
| 306 #if defined(__MINGW32__) || defined(__MINGW64__) | |
| 307 #define DUK_F_MINGW | |
| 308 #endif | |
| 309 | |
| 310 /* MSVC */ | |
| 311 #if defined(_MSC_VER) | |
| 312 /* MSVC preprocessor defines: http://msdn.microsoft.com/en-us/library/b0084kay.aspx | |
| 313 * _MSC_FULL_VER includes the build number, but it has at least two formats, see e.g. | |
| 314 * BOOST_MSVC_FULL_VER in http://www.boost.org/doc/libs/1_52_0/boost/config/compiler/visualc.hpp | |
| 315 */ | |
| 316 #define DUK_F_MSVC | |
| 317 #if defined(_MSC_FULL_VER) | |
| 318 #if (_MSC_FULL_VER > 100000000) | |
| 319 #define DUK_F_MSVC_FULL_VER _MSC_FULL_VER | |
| 320 #else | |
| 321 #define DUK_F_MSCV_FULL_VER (_MSC_FULL_VER * 10) | |
| 322 #endif | |
| 323 #endif | |
| 324 #endif /* _MSC_VER */ | |
| 325 | |
| 326 /* TinyC */ | |
| 327 #if defined(__TINYC__) | |
| 328 /* http://bellard.org/tcc/tcc-doc.html#SEC9 */ | |
| 329 #define DUK_F_TINYC | |
| 330 #endif | |
| 331 | |
| 332 /* VBCC */ | |
| 333 #if defined(__VBCC__) | |
| 334 #define DUK_F_VBCC | |
| 335 #endif | |
| 336 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
337 /* Atari Mint */ |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
338 #if defined(__MINT__) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
339 #define DUK_F_MINT |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
340 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
341 |
| 3 | 342 /* |
| 343 * Platform autodetection | |
| 344 */ | |
| 345 | |
| 346 /* Workaround for older C++ compilers before including <inttypes.h>, | |
| 347 * see e.g.: https://sourceware.org/bugzilla/show_bug.cgi?id=15366 | |
| 348 */ | |
| 349 #if defined(__cplusplus) && !defined(__STDC_LIMIT_MACROS) | |
| 350 #define __STDC_LIMIT_MACROS | |
| 351 #endif | |
| 352 #if defined(__cplusplus) && !defined(__STDC_CONSTANT_MACROS) | |
| 353 #define __STDC_CONSTANT_MACROS | |
| 354 #endif | |
| 355 | |
| 356 #if defined(DUK_F_APPLE) | |
| 357 /* --- Mac OSX, iPhone, Darwin --- */ | |
| 358 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 359 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 360 #define DUK_USE_DATE_PRS_STRPTIME | |
| 361 #define DUK_USE_DATE_FMT_STRFTIME | |
| 362 #include <TargetConditionals.h> | |
| 363 #include <architecture/byte_order.h> | |
| 364 #include <sys/param.h> | |
| 365 #include <sys/time.h> | |
| 366 #include <time.h> | |
| 367 | |
| 368 /* http://stackoverflow.com/questions/5919996/how-to-detect-reliably-mac-os-x-ios-linux-windows-in-c-preprocessor */ | |
| 369 #if TARGET_IPHONE_SIMULATOR | |
| 370 #define DUK_USE_OS_STRING "iphone-sim" | |
| 371 #elif TARGET_OS_IPHONE | |
| 372 #define DUK_USE_OS_STRING "iphone" | |
| 373 #elif TARGET_OS_MAC | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
374 #define DUK_USE_OS_STRING "osx" |
| 3 | 375 #else |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
376 #define DUK_USE_OS_STRING "osx-unknown" |
| 3 | 377 #endif |
| 378 | |
| 379 /* Use _setjmp() on Apple by default, see GH-55. */ | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
380 #define DUK_JMPBUF_TYPE jmp_buf |
| 3 | 381 #define DUK_SETJMP(jb) _setjmp((jb)) |
| 382 #define DUK_LONGJMP(jb) _longjmp((jb), 1) | |
| 383 #elif defined(DUK_F_OPENBSD) | |
| 384 /* --- OpenBSD --- */ | |
| 385 /* http://www.monkey.org/openbsd/archive/ports/0401/msg00089.html */ | |
| 386 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 387 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 388 #define DUK_USE_DATE_PRS_STRPTIME | |
| 389 #define DUK_USE_DATE_FMT_STRFTIME | |
| 390 #include <sys/types.h> | |
| 391 #include <sys/endian.h> | |
| 392 #include <sys/param.h> | |
| 393 #include <sys/time.h> | |
| 394 #include <time.h> | |
| 395 | |
| 396 #define DUK_USE_OS_STRING "openbsd" | |
| 397 #elif defined(DUK_F_BSD) | |
| 398 /* --- Generic BSD --- */ | |
| 399 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 400 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 401 #define DUK_USE_DATE_PRS_STRPTIME | |
| 402 #define DUK_USE_DATE_FMT_STRFTIME | |
| 403 #include <sys/types.h> | |
| 404 #include <sys/endian.h> | |
| 405 #include <sys/param.h> | |
| 406 #include <sys/time.h> | |
| 407 #include <time.h> | |
| 408 | |
| 409 #define DUK_USE_OS_STRING "bsd" | |
| 410 #elif defined(DUK_F_TOS) | |
| 411 /* --- Atari ST TOS --- */ | |
| 412 #define DUK_USE_DATE_NOW_TIME | |
| 413 #define DUK_USE_DATE_TZO_GMTIME | |
| 414 /* no parsing (not an error) */ | |
| 415 #define DUK_USE_DATE_FMT_STRFTIME | |
| 416 #include <time.h> | |
| 417 | |
| 418 #define DUK_USE_OS_STRING "tos" | |
| 419 | |
| 420 /* TOS on M68K is always big endian. */ | |
| 421 #if !defined(DUK_USE_BYTEORDER) && defined(DUK_F_M68K) | |
| 422 #define DUK_USE_BYTEORDER 3 | |
| 423 #endif | |
| 424 #elif defined(DUK_F_AMIGAOS) | |
| 425 /* --- AmigaOS --- */ | |
| 426 #if defined(DUK_F_M68K) | |
| 427 /* AmigaOS on M68k */ | |
| 428 #define DUK_USE_DATE_NOW_TIME | |
| 429 #define DUK_USE_DATE_TZO_GMTIME | |
| 430 /* no parsing (not an error) */ | |
| 431 #define DUK_USE_DATE_FMT_STRFTIME | |
| 432 #include <time.h> | |
| 433 #elif defined(DUK_F_PPC) | |
| 434 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 435 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 436 #define DUK_USE_DATE_PRS_STRPTIME | |
| 437 #define DUK_USE_DATE_FMT_STRFTIME | |
| 438 #include <time.h> | |
| 439 #ifndef UINTPTR_MAX | |
| 440 #define UINTPTR_MAX UINT_MAX | |
| 441 #endif | |
| 442 #else | |
| 443 #error AmigaOS but not M68K/PPC, not supported now | |
| 444 #endif | |
| 445 | |
| 446 #define DUK_USE_OS_STRING "amigaos" | |
| 447 | |
| 448 /* AmigaOS on M68K or PPC is always big endian. */ | |
| 449 #if !defined(DUK_USE_BYTEORDER) && (defined(DUK_F_M68K) || defined(DUK_F_PPC)) | |
| 450 #define DUK_USE_BYTEORDER 3 | |
| 451 #endif | |
| 452 #elif defined(DUK_F_WINDOWS) | |
| 453 /* --- Windows --- */ | |
| 454 /* Initial fix: disable secure CRT related warnings when compiling Duktape | |
| 455 * itself (must be defined before including Windows headers). Don't define | |
| 456 * for user code including duktape.h. | |
| 457 */ | |
| 458 #if defined(DUK_COMPILING_DUKTAPE) && !defined(_CRT_SECURE_NO_WARNINGS) | |
| 459 #define _CRT_SECURE_NO_WARNINGS | |
| 460 #endif | |
| 461 | |
| 462 /* Windows 32-bit and 64-bit are currently the same. */ | |
| 463 /* MSVC does not have sys/param.h */ | |
| 464 #define DUK_USE_DATE_NOW_WINDOWS | |
| 465 #define DUK_USE_DATE_TZO_WINDOWS | |
| 466 /* Note: PRS and FMT are intentionally left undefined for now. This means | |
| 467 * there is no platform specific date parsing/formatting but there is still | |
| 468 * the ISO 8601 standard format. | |
| 469 */ | |
| 470 #if defined(DUK_COMPILING_DUKTAPE) | |
| 471 /* Only include when compiling Duktape to avoid polluting application build | |
| 472 * with a lot of unnecessary defines. | |
| 473 */ | |
| 474 #include <windows.h> | |
| 475 #endif | |
| 476 | |
| 477 #define DUK_USE_OS_STRING "windows" | |
| 478 | |
| 479 /* On Windows, assume we're little endian. Even Itanium which has a | |
| 480 * configurable endianness runs little endian in Windows. | |
| 481 */ | |
| 482 #if !defined(DUK_USE_BYTEORDER) | |
| 483 #define DUK_USE_BYTEORDER 1 | |
| 484 #endif | |
| 485 #elif defined(DUK_F_FLASHPLAYER) | |
| 486 /* --- Flashplayer (Crossbridge) --- */ | |
| 487 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 488 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 489 #define DUK_USE_DATE_PRS_STRPTIME | |
| 490 #define DUK_USE_DATE_FMT_STRFTIME | |
| 491 #include <endian.h> | |
| 492 #include <sys/param.h> | |
| 493 #include <sys/time.h> | |
| 494 #include <time.h> | |
| 495 | |
| 496 #define DUK_USE_OS_STRING "flashplayer" | |
| 497 | |
| 498 #if !defined(DUK_USE_BYTEORDER) && defined(DUK_F_FLASHPLAYER) | |
| 499 #define DUK_USE_BYTEORDER 1 | |
| 500 #endif | |
| 501 #elif defined(DUK_F_QNX) | |
| 502 /* --- QNX --- */ | |
| 503 #if defined(DUK_F_QNX) && defined(DUK_COMPILING_DUKTAPE) | |
| 504 /* See: /opt/qnx650/target/qnx6/usr/include/sys/platform.h */ | |
| 505 #define _XOPEN_SOURCE 600 | |
| 506 #define _POSIX_C_SOURCE 200112L | |
| 507 #endif | |
| 508 | |
| 509 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 510 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 511 #define DUK_USE_DATE_PRS_STRPTIME | |
| 512 #define DUK_USE_DATE_FMT_STRFTIME | |
| 513 #include <sys/types.h> | |
| 514 #include <sys/param.h> | |
| 515 #include <sys/time.h> | |
| 516 #include <time.h> | |
| 517 | |
| 518 #define DUK_USE_OS_STRING "qnx" | |
| 519 #elif defined(DUK_F_TINSPIRE) | |
| 520 /* --- TI-Nspire --- */ | |
| 521 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 522 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 523 #define DUK_USE_DATE_PRS_STRPTIME | |
| 524 #define DUK_USE_DATE_FMT_STRFTIME | |
| 525 #include <sys/types.h> | |
| 526 #include <sys/param.h> | |
| 527 #include <sys/time.h> | |
| 528 #include <time.h> | |
| 529 | |
| 530 #define DUK_USE_OS_STRING "tinspire" | |
| 531 #elif defined(DUK_F_EMSCRIPTEN) | |
| 532 /* --- Emscripten --- */ | |
| 533 #if defined(DUK_COMPILING_DUKTAPE) | |
| 534 #ifndef _POSIX_C_SOURCE | |
| 535 #define _POSIX_C_SOURCE 200809L | |
| 536 #endif | |
| 537 #ifndef _GNU_SOURCE | |
| 538 #define _GNU_SOURCE /* e.g. getdate_r */ | |
| 539 #endif | |
| 540 #ifndef _XOPEN_SOURCE | |
| 541 #define _XOPEN_SOURCE /* e.g. strptime */ | |
| 542 #endif | |
| 543 #endif /* DUK_COMPILING_DUKTAPE */ | |
| 544 | |
| 545 #include <sys/types.h> | |
| 546 #if defined(DUK_F_BCC) | |
| 547 /* no endian.h */ | |
| 548 #else | |
| 549 #include <endian.h> | |
| 550 #endif /* DUK_F_BCC */ | |
| 551 #include <sys/param.h> | |
| 552 #include <sys/time.h> | |
| 553 #include <time.h> | |
| 554 #include <stdint.h> | |
| 555 | |
| 556 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 557 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 558 #define DUK_USE_DATE_PRS_STRPTIME | |
| 559 #define DUK_USE_DATE_FMT_STRFTIME | |
| 560 | |
| 561 #define DUK_USE_OS_STRING "emscripten" | |
| 562 #elif defined(DUK_F_LINUX) | |
| 563 /* --- Linux --- */ | |
| 564 #if defined(DUK_COMPILING_DUKTAPE) | |
| 565 #ifndef _POSIX_C_SOURCE | |
| 566 #define _POSIX_C_SOURCE 200809L | |
| 567 #endif | |
| 568 #ifndef _GNU_SOURCE | |
| 569 #define _GNU_SOURCE /* e.g. getdate_r */ | |
| 570 #endif | |
| 571 #ifndef _XOPEN_SOURCE | |
| 572 #define _XOPEN_SOURCE /* e.g. strptime */ | |
| 573 #endif | |
| 574 #endif /* DUK_COMPILING_DUKTAPE */ | |
| 575 | |
| 576 #include <sys/types.h> | |
| 577 #if defined(DUK_F_BCC) | |
| 578 /* no endian.h or stdint.h */ | |
| 579 #else | |
| 580 #include <endian.h> | |
| 581 #include <stdint.h> | |
| 582 #endif /* DUK_F_BCC */ | |
| 583 #include <sys/param.h> | |
| 584 #include <sys/time.h> | |
| 585 #include <time.h> | |
| 586 | |
| 587 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 588 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 589 #define DUK_USE_DATE_PRS_STRPTIME | |
| 590 #define DUK_USE_DATE_FMT_STRFTIME | |
| 591 | |
| 592 #define DUK_USE_OS_STRING "linux" | |
| 593 #elif defined(DUK_F_SUN) | |
| 594 /* --- Solaris --- */ | |
| 595 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 596 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 597 #define DUK_USE_DATE_PRS_STRPTIME | |
| 598 #define DUK_USE_DATE_FMT_STRFTIME | |
| 599 | |
| 600 #include <sys/types.h> | |
| 601 #include <ast/endian.h> | |
| 602 #include <sys/param.h> | |
| 603 #include <sys/time.h> | |
| 604 #include <time.h> | |
| 605 | |
| 606 #define DUK_USE_OS_STRING "solaris" | |
| 607 #elif defined(DUK_F_POSIX) | |
| 608 /* --- Generic POSIX --- */ | |
| 609 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 610 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 611 #define DUK_USE_DATE_PRS_STRPTIME | |
| 612 #define DUK_USE_DATE_FMT_STRFTIME | |
| 613 #include <sys/types.h> | |
| 614 #include <endian.h> | |
| 615 #include <sys/param.h> | |
| 616 #include <sys/time.h> | |
| 617 #include <time.h> | |
| 618 | |
| 619 #define DUK_USE_OS_STRING "posix" | |
| 620 #elif defined(DUK_F_CYGWIN) | |
| 621 /* --- Cygwin --- */ | |
| 622 /* don't use strptime() for now */ | |
| 623 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 624 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 625 #define DUK_USE_DATE_FMT_STRFTIME | |
| 626 #include <sys/types.h> | |
| 627 #include <endian.h> | |
| 628 #include <sys/param.h> | |
| 629 #include <sys/time.h> | |
| 630 #include <time.h> | |
| 631 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
632 #define DUK_JMPBUF_TYPE jmp_buf |
| 3 | 633 #define DUK_SETJMP(jb) _setjmp((jb)) |
| 634 #define DUK_LONGJMP(jb) _longjmp((jb), 1) | |
| 635 | |
| 636 #define DUK_USE_OS_STRING "windows" | |
| 637 #elif defined(DUK_F_UNIX) | |
| 638 /* --- Generic UNIX --- */ | |
| 639 #define DUK_USE_DATE_NOW_GETTIMEOFDAY | |
| 640 #define DUK_USE_DATE_TZO_GMTIME_R | |
| 641 #define DUK_USE_DATE_PRS_STRPTIME | |
| 642 #define DUK_USE_DATE_FMT_STRFTIME | |
| 643 #include <time.h> | |
| 644 #include <sys/time.h> | |
| 645 #define DUK_USE_OS_STRING "unknown" | |
| 646 #else | |
| 647 /* --- Generic fallback --- */ | |
| 648 /* The most portable current time provider is time(), but it only has a | |
| 649 * one second resolution. | |
| 650 */ | |
| 651 #define DUK_USE_DATE_NOW_TIME | |
| 652 | |
| 653 /* The most portable way to figure out local time offset is gmtime(), | |
| 654 * but it's not thread safe so use with caution. | |
| 655 */ | |
| 656 #define DUK_USE_DATE_TZO_GMTIME | |
| 657 | |
| 658 /* Avoid custom date parsing and formatting for portability. */ | |
| 659 #undef DUK_USE_DATE_PRS_STRPTIME | |
| 660 #undef DUK_USE_DATE_FMT_STRFTIME | |
| 661 | |
| 662 /* Rely on C89 headers only; time.h must be here. */ | |
| 663 #include <time.h> | |
| 664 | |
| 665 #define DUK_USE_OS_STRING "unknown" | |
| 666 #endif /* autodetect platform */ | |
| 667 | |
| 668 /* Shared includes: C89 */ | |
| 669 #include <stdio.h> | |
| 670 #include <stdlib.h> | |
| 671 #include <string.h> | |
| 672 #include <stdarg.h> /* varargs */ | |
| 673 #include <setjmp.h> | |
| 674 #include <stddef.h> /* e.g. ptrdiff_t */ | |
| 675 #include <math.h> | |
| 676 #include <limits.h> | |
| 677 | |
| 678 /* date.h is omitted, and included per platform */ | |
| 679 | |
| 680 /* Shared includes: stdint.h is C99 */ | |
| 681 #if defined(DUK_F_NO_STDINT_H) | |
| 682 /* stdint.h not available */ | |
| 683 #else | |
| 684 /* Technically C99 (C++11) but found in many systems. On some systems | |
| 685 * __STDC_LIMIT_MACROS and __STDC_CONSTANT_MACROS must be defined before | |
| 686 * including stdint.h (see above). | |
| 687 */ | |
| 688 #include <stdint.h> | |
| 689 #endif | |
| 690 | |
| 691 #if defined(DUK_F_CPP) | |
| 692 #include <exception> /* std::exception */ | |
| 693 #endif | |
| 694 | |
| 695 /* | |
| 696 * Architecture autodetection | |
| 697 */ | |
| 698 | |
| 699 #if defined(DUK_F_X86) | |
| 700 /* --- x86 --- */ | |
| 701 #define DUK_USE_ARCH_STRING "x86" | |
| 702 #if !defined(DUK_USE_BYTEORDER) | |
| 703 #define DUK_USE_BYTEORDER 1 | |
| 704 #endif | |
| 705 /* XXX: This is technically not guaranteed because it's possible to configure | |
| 706 * an x86 to require aligned accesses with Alignment Check (AC) flag. | |
| 707 */ | |
| 708 #if !defined(DUK_USE_ALIGN_BY) | |
| 709 #define DUK_USE_ALIGN_BY 1 | |
| 710 #endif | |
| 711 #define DUK_USE_PACKED_TVAL | |
| 712 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 713 #elif defined(DUK_F_X64) | |
| 714 /* --- x64 --- */ | |
| 715 #define DUK_USE_ARCH_STRING "x64" | |
| 716 #if !defined(DUK_USE_BYTEORDER) | |
| 717 #define DUK_USE_BYTEORDER 1 | |
| 718 #endif | |
| 719 /* XXX: This is technically not guaranteed because it's possible to configure | |
| 720 * an x86 to require aligned accesses with Alignment Check (AC) flag. | |
| 721 */ | |
| 722 #if !defined(DUK_USE_ALIGN_BY) | |
| 723 #define DUK_USE_ALIGN_BY 1 | |
| 724 #endif | |
| 725 #undef DUK_USE_PACKED_TVAL | |
| 726 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 727 #elif defined(DUK_F_X32) | |
| 728 /* --- x32 --- */ | |
| 729 #define DUK_USE_ARCH_STRING "x32" | |
| 730 #if !defined(DUK_USE_BYTEORDER) | |
| 731 #define DUK_USE_BYTEORDER 1 | |
| 732 #endif | |
| 733 /* XXX: This is technically not guaranteed because it's possible to configure | |
| 734 * an x86 to require aligned accesses with Alignment Check (AC) flag. | |
| 735 */ | |
| 736 #if !defined(DUK_USE_ALIGN_BY) | |
| 737 #define DUK_USE_ALIGN_BY 1 | |
| 738 #endif | |
| 739 #define DUK_USE_PACKED_TVAL | |
| 740 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 741 #elif defined(DUK_F_ARM32) | |
| 742 /* --- ARM 32-bit --- */ | |
| 743 #define DUK_USE_ARCH_STRING "arm32" | |
| 744 /* Byte order varies, so rely on autodetect. */ | |
| 745 #if !defined(DUK_USE_ALIGN_BY) | |
| 746 #define DUK_USE_ALIGN_BY 4 | |
| 747 #endif | |
| 748 #define DUK_USE_PACKED_TVAL | |
| 749 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 750 #elif defined(DUK_F_ARM64) | |
| 751 /* --- ARM 64-bit --- */ | |
| 752 #define DUK_USE_ARCH_STRING "arm64" | |
| 753 /* Byte order varies, so rely on autodetect. */ | |
| 754 #if !defined(DUK_USE_ALIGN_BY) | |
| 755 #define DUK_USE_ALIGN_BY 8 | |
| 756 #endif | |
| 757 #undef DUK_USE_PACKED_TVAL | |
| 758 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 759 #elif defined(DUK_F_MIPS32) | |
| 760 /* --- MIPS 32-bit --- */ | |
| 761 #define DUK_USE_ARCH_STRING "mips32" | |
| 762 /* MIPS byte order varies so rely on autodetection. */ | |
| 763 /* Based on 'make checkalign' there are no alignment requirements on | |
| 764 * Linux MIPS except for doubles, which need align by 4. Alignment | |
| 765 * requirements vary based on target though. | |
| 766 */ | |
| 767 #if !defined(DUK_USE_ALIGN_BY) | |
| 768 #define DUK_USE_ALIGN_BY 4 | |
| 769 #endif | |
| 770 #define DUK_USE_PACKED_TVAL | |
| 771 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 772 #elif defined(DUK_F_MIPS64) | |
| 773 /* --- MIPS 64-bit --- */ | |
| 774 #define DUK_USE_ARCH_STRING "mips64" | |
| 775 /* MIPS byte order varies so rely on autodetection. */ | |
| 776 /* Good default is a bit arbitrary because alignment requirements | |
| 777 * depend on target. See https://github.com/svaarala/duktape/issues/102. | |
| 778 */ | |
| 779 #if !defined(DUK_USE_ALIGN_BY) | |
| 780 #define DUK_USE_ALIGN_BY 8 | |
| 781 #endif | |
| 782 #undef DUK_USE_PACKED_TVAL | |
| 783 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 784 #elif defined(DUK_F_PPC32) | |
| 785 /* --- PowerPC 32-bit --- */ | |
| 786 #define DUK_USE_ARCH_STRING "ppc32" | |
| 787 #if !defined(DUK_USE_BYTEORDER) | |
| 788 #define DUK_USE_BYTEORDER 3 | |
| 789 #endif | |
| 790 #if !defined(DUK_USE_ALIGN_BY) | |
| 791 #define DUK_USE_ALIGN_BY 8 | |
| 792 #endif | |
| 793 #define DUK_USE_PACKED_TVAL | |
| 794 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 795 #elif defined(DUK_F_PPC64) | |
| 796 /* --- PowerPC 64-bit --- */ | |
| 797 #define DUK_USE_ARCH_STRING "ppc64" | |
| 798 #if !defined(DUK_USE_BYTEORDER) | |
| 799 #define DUK_USE_BYTEORDER 3 | |
| 800 #endif | |
| 801 #if !defined(DUK_USE_ALIGN_BY) | |
| 802 #define DUK_USE_ALIGN_BY 8 | |
| 803 #endif | |
| 804 #undef DUK_USE_PACKED_TVAL | |
| 805 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 806 #elif defined(DUK_F_SPARC32) | |
| 807 /* --- SPARC 32-bit --- */ | |
| 808 #define DUK_USE_ARCH_STRING "sparc32" | |
| 809 /* SPARC byte order varies so rely on autodetection. */ | |
| 810 #if !defined(DUK_USE_ALIGN_BY) | |
| 811 #define DUK_USE_ALIGN_BY 8 | |
| 812 #endif | |
| 813 #define DUK_USE_PACKED_TVAL | |
| 814 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 815 #elif defined(DUK_F_SPARC64) | |
| 816 /* --- SPARC 64-bit --- */ | |
| 817 #define DUK_USE_ARCH_STRING "sparc64" | |
| 818 /* SPARC byte order varies so rely on autodetection. */ | |
| 819 #if !defined(DUK_USE_ALIGN_BY) | |
| 820 #define DUK_USE_ALIGN_BY 8 | |
| 821 #endif | |
| 822 #undef DUK_USE_PACKED_TVAL | |
| 823 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 824 #elif defined(DUK_F_SUPERH) | |
| 825 /* --- SuperH --- */ | |
| 826 #define DUK_USE_ARCH_STRING "sh" | |
| 827 /* Byte order varies, rely on autodetection. */ | |
| 828 /* Based on 'make checkalign' there are no alignment requirements on | |
| 829 * Linux SH4, but align by 4 is probably a good basic default. | |
| 830 */ | |
| 831 #if !defined(DUK_USE_ALIGN_BY) | |
| 832 #define DUK_USE_ALIGN_BY 4 | |
| 833 #endif | |
| 834 #define DUK_USE_PACKED_TVAL | |
| 835 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 836 #elif defined(DUK_F_M68K) | |
| 837 /* --- Motorola 68k --- */ | |
| 838 #define DUK_USE_ARCH_STRING "m68k" | |
| 839 #if !defined(DUK_USE_BYTEORDER) | |
| 840 #define DUK_USE_BYTEORDER 3 | |
| 841 #endif | |
| 842 #if !defined(DUK_USE_ALIGN_BY) | |
| 843 #define DUK_USE_ALIGN_BY 8 | |
| 844 #endif | |
| 845 #define DUK_USE_PACKED_TVAL | |
| 846 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 847 #elif defined(DUK_F_EMSCRIPTEN) | |
| 848 /* --- Emscripten --- */ | |
| 849 #define DUK_USE_ARCH_STRING "emscripten" | |
| 850 #if !defined(DUK_USE_BYTEORDER) | |
| 851 #define DUK_USE_BYTEORDER 1 | |
| 852 #endif | |
| 853 #if !defined(DUK_USE_ALIGN_BY) | |
| 854 #define DUK_USE_ALIGN_BY 8 | |
| 855 #endif | |
| 856 #undef DUK_USE_PACKED_TVAL | |
| 857 #define DUK_F_PACKED_TVAL_PROVIDED | |
| 858 #else | |
| 859 /* --- Generic --- */ | |
| 860 /* These are necessary wild guesses. */ | |
| 861 #define DUK_USE_ARCH_STRING "generic" | |
| 862 /* Rely on autodetection for byte order, alignment, and packed tval. */ | |
| 863 #endif /* autodetect architecture */ | |
| 864 | |
| 865 /* | |
| 866 * Compiler autodetection | |
| 867 */ | |
| 868 | |
| 869 #if defined(DUK_F_CLANG) | |
| 870 /* --- Clang --- */ | |
| 871 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 872 /* C99 / C++11 and above: rely on va_copy() which is required. */ | |
| 873 #define DUK_VA_COPY(dest,src) va_copy(dest,src) | |
| 874 #else | |
| 875 /* Clang: assume we have __va_copy() in non-C99 mode. */ | |
| 876 #define DUK_VA_COPY(dest,src) __va_copy(dest,src) | |
| 877 #endif | |
| 878 | |
| 879 #define DUK_NORETURN(decl) decl __attribute__((noreturn)) | |
| 880 | |
| 881 #if defined(__clang__) && defined(__has_builtin) | |
| 882 #if __has_builtin(__builtin_unreachable) | |
| 883 #define DUK_UNREACHABLE() do { __builtin_unreachable(); } while (0) | |
| 884 #endif | |
| 885 #endif | |
| 886 | |
| 887 #define DUK_USE_BRANCH_HINTS | |
| 888 #define DUK_LIKELY(x) __builtin_expect((x), 1) | |
| 889 #define DUK_UNLIKELY(x) __builtin_expect((x), 0) | |
| 890 | |
| 891 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 892 #define DUK_NOINLINE __attribute__((noinline)) | |
| 893 #define DUK_INLINE inline | |
| 894 #define DUK_ALWAYS_INLINE inline __attribute__((always_inline)) | |
| 895 #endif | |
| 896 | |
| 897 #if defined(DUK_F_DLL_BUILD) && defined(DUK_F_WINDOWS) | |
| 898 /* MSVC dllexport/dllimport: appropriate __declspec depends on whether we're | |
| 899 * compiling Duktape or the application. | |
| 900 */ | |
| 901 #if defined(DUK_COMPILING_DUKTAPE) | |
| 902 #define DUK_EXTERNAL_DECL extern __declspec(dllexport) | |
| 903 #define DUK_EXTERNAL __declspec(dllexport) | |
| 904 #else | |
| 905 #define DUK_EXTERNAL_DECL extern __declspec(dllimport) | |
| 906 #define DUK_EXTERNAL should_not_happen | |
| 907 #endif | |
| 908 #if defined(DUK_SINGLE_FILE) | |
| 909 #define DUK_INTERNAL_DECL static | |
| 910 #define DUK_INTERNAL static | |
| 911 #else | |
| 912 #define DUK_INTERNAL_DECL extern | |
| 913 #define DUK_INTERNAL /*empty*/ | |
| 914 #endif | |
| 915 #define DUK_LOCAL_DECL static | |
| 916 #define DUK_LOCAL static | |
| 917 #else | |
| 918 #define DUK_EXTERNAL_DECL __attribute__ ((visibility("default"))) extern | |
| 919 #define DUK_EXTERNAL __attribute__ ((visibility("default"))) | |
| 920 #if defined(DUK_SINGLE_FILE) | |
| 921 #define DUK_INTERNAL_DECL static | |
| 922 #define DUK_INTERNAL static | |
| 923 #else | |
| 924 #define DUK_INTERNAL_DECL __attribute__ ((visibility("hidden"))) extern | |
| 925 #define DUK_INTERNAL __attribute__ ((visibility("hidden"))) | |
| 926 #endif | |
| 927 #define DUK_LOCAL_DECL static | |
| 928 #define DUK_LOCAL static | |
| 929 #endif | |
| 930 | |
| 931 #if defined(DUK_F_CPP) | |
| 932 #define DUK_USE_COMPILER_STRING "clang" | |
| 933 #else | |
| 934 #define DUK_USE_COMPILER_STRING "clang" | |
| 935 #endif | |
| 936 | |
| 937 #undef DUK_USE_VARIADIC_MACROS | |
| 938 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 939 #define DUK_USE_VARIADIC_MACROS | |
| 940 #endif | |
| 941 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
942 #define DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
943 |
| 3 | 944 #undef DUK_USE_FLEX_C99 |
| 945 #undef DUK_USE_FLEX_ZEROSIZE | |
| 946 #undef DUK_USE_FLEX_ONESIZE | |
| 947 #if defined(DUK_F_C99) | |
| 948 #define DUK_USE_FLEX_C99 | |
| 949 #else | |
| 950 #define DUK_USE_FLEX_ZEROSIZE | |
| 951 #endif | |
| 952 | |
| 953 #undef DUK_USE_GCC_PRAGMAS | |
| 954 #define DUK_USE_PACK_CLANG_ATTR | |
| 955 #elif defined(DUK_F_GCC) | |
| 956 /* --- GCC --- */ | |
| 957 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 958 /* C99 / C++11 and above: rely on va_copy() which is required. */ | |
| 959 #define DUK_VA_COPY(dest,src) va_copy(dest,src) | |
| 960 #else | |
| 961 /* GCC: assume we have __va_copy() in non-C99 mode. */ | |
| 962 #define DUK_VA_COPY(dest,src) __va_copy(dest,src) | |
| 963 #endif | |
| 964 | |
| 965 #if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 20500L) | |
| 966 /* since gcc-2.5 */ | |
| 967 #define DUK_NORETURN(decl) decl __attribute__((noreturn)) | |
| 968 #endif | |
| 969 | |
| 970 #if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 40500L) | |
| 971 /* since gcc-4.5 */ | |
| 972 #define DUK_UNREACHABLE() do { __builtin_unreachable(); } while (0) | |
| 973 #endif | |
| 974 | |
| 975 #define DUK_USE_BRANCH_HINTS | |
| 976 #if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 40500L) | |
| 977 /* GCC: test not very accurate; enable only in relatively recent builds | |
| 978 * because of bugs in gcc-4.4 (http://lists.debian.org/debian-gcc/2010/04/msg00000.html) | |
| 979 */ | |
| 980 #define DUK_LIKELY(x) __builtin_expect((x), 1) | |
| 981 #define DUK_UNLIKELY(x) __builtin_expect((x), 0) | |
| 982 #endif | |
| 983 | |
| 984 #if (defined(DUK_F_C99) || defined(DUK_F_CPP11)) && \ | |
| 985 defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 30101) | |
| 986 #define DUK_NOINLINE __attribute__((noinline)) | |
| 987 #define DUK_INLINE inline | |
| 988 #define DUK_ALWAYS_INLINE inline __attribute__((always_inline)) | |
| 989 #endif | |
| 990 | |
| 991 #if defined(DUK_F_DLL_BUILD) && defined(DUK_F_WINDOWS) | |
| 992 /* MSVC dllexport/dllimport: appropriate __declspec depends on whether we're | |
| 993 * compiling Duktape or the application. | |
| 994 */ | |
| 995 #if defined(DUK_COMPILING_DUKTAPE) | |
| 996 #define DUK_EXTERNAL_DECL extern __declspec(dllexport) | |
| 997 #define DUK_EXTERNAL __declspec(dllexport) | |
| 998 #else | |
| 999 #define DUK_EXTERNAL_DECL extern __declspec(dllimport) | |
| 1000 #define DUK_EXTERNAL should_not_happen | |
| 1001 #endif | |
| 1002 #if defined(DUK_SINGLE_FILE) | |
| 1003 #define DUK_INTERNAL_DECL static | |
| 1004 #define DUK_INTERNAL static | |
| 1005 #else | |
| 1006 #define DUK_INTERNAL_DECL extern | |
| 1007 #define DUK_INTERNAL /*empty*/ | |
| 1008 #endif | |
| 1009 #define DUK_LOCAL_DECL static | |
| 1010 #define DUK_LOCAL static | |
| 1011 #elif defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 40000) | |
| 1012 #define DUK_EXTERNAL_DECL __attribute__ ((visibility("default"))) extern | |
| 1013 #define DUK_EXTERNAL __attribute__ ((visibility("default"))) | |
| 1014 #if defined(DUK_SINGLE_FILE) | |
| 1015 #define DUK_INTERNAL_DECL static | |
| 1016 #define DUK_INTERNAL static | |
| 1017 #else | |
| 1018 #define DUK_INTERNAL_DECL __attribute__ ((visibility("hidden"))) extern | |
| 1019 #define DUK_INTERNAL __attribute__ ((visibility("hidden"))) | |
| 1020 #endif | |
| 1021 #define DUK_LOCAL_DECL static | |
| 1022 #define DUK_LOCAL static | |
| 1023 #endif | |
| 1024 | |
| 1025 #if defined(DUK_F_MINGW) | |
| 1026 #if defined(DUK_F_CPP) | |
| 1027 #define DUK_USE_COMPILER_STRING "mingw++" | |
| 1028 #else | |
| 1029 #define DUK_USE_COMPILER_STRING "mingw" | |
| 1030 #endif | |
| 1031 #else | |
| 1032 #if defined(DUK_F_CPP) | |
| 1033 #define DUK_USE_COMPILER_STRING "g++" | |
| 1034 #else | |
| 1035 #define DUK_USE_COMPILER_STRING "gcc" | |
| 1036 #endif | |
| 1037 #endif | |
| 1038 | |
| 1039 #undef DUK_USE_VARIADIC_MACROS | |
| 1040 #if defined(DUK_F_C99) || (defined(DUK_F_CPP11) && defined(__GNUC__)) | |
| 1041 #define DUK_USE_VARIADIC_MACROS | |
| 1042 #endif | |
| 1043 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1044 #define DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1045 |
| 3 | 1046 #undef DUK_USE_FLEX_C99 |
| 1047 #undef DUK_USE_FLEX_ZEROSIZE | |
| 1048 #undef DUK_USE_FLEX_ONESIZE | |
| 1049 #if defined(DUK_F_C99) | |
| 1050 #define DUK_USE_FLEX_C99 | |
| 1051 #else | |
| 1052 #define DUK_USE_FLEX_ZEROSIZE | |
| 1053 #endif | |
| 1054 | |
| 1055 #if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION >= 40600) | |
| 1056 #define DUK_USE_GCC_PRAGMAS | |
| 1057 #else | |
| 1058 #undef DUK_USE_GCC_PRAGMAS | |
| 1059 #endif | |
| 1060 | |
| 1061 #define DUK_USE_PACK_GCC_ATTR | |
| 1062 #elif defined(DUK_F_MSVC) | |
| 1063 /* --- MSVC --- */ | |
| 1064 /* http://msdn.microsoft.com/en-us/library/aa235362(VS.60).aspx */ | |
| 1065 #define DUK_NORETURN(decl) __declspec(noreturn) decl | |
| 1066 | |
| 1067 /* XXX: DUK_UNREACHABLE for msvc? */ | |
| 1068 | |
| 1069 #undef DUK_USE_BRANCH_HINTS | |
| 1070 | |
| 1071 /* XXX: DUK_LIKELY, DUK_UNLIKELY for msvc? */ | |
| 1072 /* XXX: DUK_NOINLINE, DUK_INLINE, DUK_ALWAYS_INLINE for msvc? */ | |
| 1073 | |
| 1074 #if defined(DUK_F_DLL_BUILD) && defined(DUK_F_WINDOWS) | |
| 1075 /* MSVC dllexport/dllimport: appropriate __declspec depends on whether we're | |
| 1076 * compiling Duktape or the application. | |
| 1077 */ | |
| 1078 #if defined(DUK_COMPILING_DUKTAPE) | |
| 1079 #define DUK_EXTERNAL_DECL extern __declspec(dllexport) | |
| 1080 #define DUK_EXTERNAL __declspec(dllexport) | |
| 1081 #else | |
| 1082 #define DUK_EXTERNAL_DECL extern __declspec(dllimport) | |
| 1083 #define DUK_EXTERNAL should_not_happen | |
| 1084 #endif | |
| 1085 #if defined(DUK_SINGLE_FILE) | |
| 1086 #define DUK_INTERNAL_DECL static | |
| 1087 #define DUK_INTERNAL static | |
| 1088 #else | |
| 1089 #define DUK_INTERNAL_DECL extern | |
| 1090 #define DUK_INTERNAL /*empty*/ | |
| 1091 #endif | |
| 1092 #define DUK_LOCAL_DECL static | |
| 1093 #define DUK_LOCAL static | |
| 1094 #endif | |
| 1095 | |
| 1096 #if defined(DUK_F_CPP) | |
| 1097 #define DUK_USE_COMPILER_STRING "msvc++" | |
| 1098 #else | |
| 1099 #define DUK_USE_COMPILER_STRING "msvc" | |
| 1100 #endif | |
| 1101 | |
| 1102 #undef DUK_USE_VARIADIC_MACROS | |
| 1103 #if defined(DUK_F_C99) | |
| 1104 #define DUK_USE_VARIADIC_MACROS | |
| 1105 #elif defined(_MSC_VER) && (_MSC_VER >= 1400) | |
| 1106 /* VS2005+ should have variadic macros even when they're not C99. */ | |
| 1107 #define DUK_USE_VARIADIC_MACROS | |
| 1108 #endif | |
| 1109 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1110 #undef DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1111 #if defined(_MSC_VER) && (_MSC_VER >= 1800) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1112 /* VS2013+ supports union initializers but there's a bug involving union-inside-struct: |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1113 * https://connect.microsoft.com/VisualStudio/feedback/details/805981 |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1114 * The bug was fixed (at least) in VS2015 so check for VS2015 for now: |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1115 * https://blogs.msdn.microsoft.com/vcblog/2015/07/01/c-compiler-front-end-fixes-in-vs2015/ |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1116 * Manually tested using VS2013, CL reports 18.00.31101, so enable for VS2013 too. |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1117 */ |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1118 #define DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1119 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1120 |
| 3 | 1121 #undef DUK_USE_FLEX_C99 |
| 1122 #undef DUK_USE_FLEX_ZEROSIZE | |
| 1123 #undef DUK_USE_FLEX_ONESIZE | |
| 1124 #if defined(DUK_F_C99) | |
| 1125 #define DUK_USE_FLEX_C99 | |
| 1126 #else | |
| 1127 #define DUK_USE_FLEX_ZEROSIZE | |
| 1128 #endif | |
| 1129 | |
| 1130 #undef DUK_USE_GCC_PRAGMAS | |
| 1131 | |
| 1132 #define DUK_USE_PACK_MSVC_PRAGMA | |
| 1133 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1134 /* These have been tested from VS2008 onwards; may work in older VS versions |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1135 * too but not enabled by default. |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1136 */ |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1137 #if defined(_MSC_VER) && (_MSC_VER >= 1500) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1138 #define DUK_NOINLINE __declspec(noinline) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1139 #define DUK_INLINE __inline |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1140 #define DUK_ALWAYS_INLINE __forceinline |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1141 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1142 |
| 3 | 1143 #if defined(_MSC_VER) && (_MSC_VER >= 1900) |
| 1144 #define DUK_SNPRINTF snprintf | |
| 1145 #define DUK_VSNPRINTF vsnprintf | |
| 1146 #else | |
| 1147 /* (v)snprintf() is missing before MSVC 2015. Note that _(v)snprintf() does | |
| 1148 * NOT NUL terminate on truncation, but Duktape code never assumes that. | |
| 1149 * http://stackoverflow.com/questions/2915672/snprintf-and-visual-studio-2010 | |
| 1150 */ | |
| 1151 #define DUK_SNPRINTF _snprintf | |
| 1152 #define DUK_VSNPRINTF _vsnprintf | |
| 1153 #endif | |
| 1154 #elif defined(DUK_F_EMSCRIPTEN) | |
| 1155 /* --- Emscripten --- */ | |
| 1156 #define DUK_NORETURN(decl) decl __attribute__((noreturn)) | |
| 1157 | |
| 1158 #if defined(__clang__) && defined(__has_builtin) | |
| 1159 #if __has_builtin(__builtin_unreachable) | |
| 1160 #define DUK_UNREACHABLE() do { __builtin_unreachable(); } while (0) | |
| 1161 #endif | |
| 1162 #endif | |
| 1163 | |
| 1164 #define DUK_USE_BRANCH_HINTS | |
| 1165 #define DUK_LIKELY(x) __builtin_expect((x), 1) | |
| 1166 #define DUK_UNLIKELY(x) __builtin_expect((x), 0) | |
| 1167 | |
| 1168 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 1169 #define DUK_NOINLINE __attribute__((noinline)) | |
| 1170 #define DUK_INLINE inline | |
| 1171 #define DUK_ALWAYS_INLINE inline __attribute__((always_inline)) | |
| 1172 #endif | |
| 1173 | |
| 1174 #define DUK_EXTERNAL_DECL __attribute__ ((visibility("default"))) extern | |
| 1175 #define DUK_EXTERNAL __attribute__ ((visibility("default"))) | |
| 1176 #if defined(DUK_SINGLE_FILE) | |
| 1177 #define DUK_INTERNAL_DECL static | |
| 1178 #define DUK_INTERNAL static | |
| 1179 #else | |
| 1180 #define DUK_INTERNAL_DECL __attribute__ ((visibility("hidden"))) extern | |
| 1181 #define DUK_INTERNAL __attribute__ ((visibility("hidden"))) | |
| 1182 #endif | |
| 1183 #define DUK_LOCAL_DECL static | |
| 1184 #define DUK_LOCAL static | |
| 1185 | |
| 1186 #define DUK_USE_COMPILER_STRING "emscripten" | |
| 1187 | |
| 1188 #undef DUK_USE_VARIADIC_MACROS | |
| 1189 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 1190 #define DUK_USE_VARIADIC_MACROS | |
| 1191 #endif | |
| 1192 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1193 #define DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1194 |
| 3 | 1195 #undef DUK_USE_FLEX_C99 |
| 1196 #undef DUK_USE_FLEX_ZEROSIZE | |
| 1197 #undef DUK_USE_FLEX_ONESIZE | |
| 1198 #if defined(DUK_F_C99) | |
| 1199 #define DUK_USE_FLEX_C99 | |
| 1200 #else | |
| 1201 #define DUK_USE_FLEX_ZEROSIZE | |
| 1202 #endif | |
| 1203 | |
| 1204 #undef DUK_USE_GCC_PRAGMAS | |
| 1205 #define DUK_USE_PACK_CLANG_ATTR | |
| 1206 #elif defined(DUK_F_TINYC) | |
| 1207 /* --- TinyC --- */ | |
| 1208 #undef DUK_USE_BRANCH_HINTS | |
| 1209 | |
| 1210 #if defined(DUK_F_CPP) | |
| 1211 #define DUK_USE_COMPILER_STRING "tinyc++" | |
| 1212 #else | |
| 1213 #define DUK_USE_COMPILER_STRING "tinyc" | |
| 1214 #endif | |
| 1215 | |
| 1216 /* http://bellard.org/tcc/tcc-doc.html#SEC7 */ | |
| 1217 #define DUK_USE_VARIADIC_MACROS | |
| 1218 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1219 #define DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1220 |
| 3 | 1221 /* Most portable, wastes space */ |
| 1222 #define DUK_USE_FLEX_ONESIZE | |
| 1223 | |
| 1224 /* Most portable, potentially wastes space */ | |
| 1225 #define DUK_USE_PACK_DUMMY_MEMBER | |
| 1226 #elif defined(DUK_F_VBCC) | |
| 1227 /* --- VBCC --- */ | |
| 1228 #undef DUK_USE_BRANCH_HINTS | |
| 1229 | |
| 1230 #if defined(DUK_F_CPP) | |
| 1231 #define DUK_USE_COMPILER_STRING "vbcc-c++" | |
| 1232 #else | |
| 1233 #define DUK_USE_COMPILER_STRING "vbcc" | |
| 1234 #endif | |
| 1235 | |
| 1236 #undef DUK_USE_VARIADIC_MACROS | |
| 1237 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 1238 #define DUK_USE_VARIADIC_MACROS | |
| 1239 #endif | |
| 1240 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1241 /* VBCC supports C99 so check only for C99 for union initializer support. |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1242 * Designated union initializers would possibly work even without a C99 check. |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1243 */ |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1244 #undef DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1245 #if defined(DUK_F_C99) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1246 #define DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1247 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1248 |
| 3 | 1249 #define DUK_USE_FLEX_ZEROSIZE |
| 1250 #define DUK_USE_PACK_DUMMY_MEMBER | |
| 1251 #elif defined(DUK_F_BCC) | |
| 1252 /* --- Bruce's C compiler --- */ | |
| 1253 #undef DUK_USE_BRANCH_HINTS | |
| 1254 | |
| 1255 #if defined(DUK_F_CPP) | |
| 1256 #define DUK_USE_COMPILER_STRING "bcc++" | |
| 1257 #else | |
| 1258 #define DUK_USE_COMPILER_STRING "bcc" | |
| 1259 #endif | |
| 1260 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1261 /* Most portable */ |
| 3 | 1262 #undef DUK_USE_VARIADIC_MACROS |
| 1263 | |
| 1264 /* Most portable, wastes space */ | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1265 #undef DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1266 |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1267 /* Most portable, wastes space */ |
| 3 | 1268 #define DUK_USE_FLEX_ONESIZE |
| 1269 | |
| 1270 /* Most portable, potentially wastes space */ | |
| 1271 #define DUK_USE_PACK_DUMMY_MEMBER | |
| 1272 | |
| 1273 /* BCC, assume we're on x86. */ | |
| 1274 #if !defined(DUK_USE_BYTEORDER) | |
| 1275 #define DUK_USE_BYTEORDER 1 | |
| 1276 #endif | |
| 1277 #else | |
| 1278 /* --- Generic --- */ | |
| 1279 #undef DUK_USE_BRANCH_HINTS | |
| 1280 | |
| 1281 #if defined(DUK_F_CPP) | |
| 1282 #define DUK_USE_COMPILER_STRING "generic-c++" | |
| 1283 #else | |
| 1284 #define DUK_USE_COMPILER_STRING "generic" | |
| 1285 #endif | |
| 1286 | |
| 1287 #undef DUK_USE_VARIADIC_MACROS | |
| 1288 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 1289 #define DUK_USE_VARIADIC_MACROS | |
| 1290 #endif | |
| 1291 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1292 /* C++ doesn't have standard designated union initializers ({ .foo = 1 }). */ |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1293 #undef DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1294 #if defined(DUK_F_C99) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1295 #define DUK_USE_UNION_INITIALIZERS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1296 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1297 |
| 3 | 1298 /* Most portable, wastes space */ |
| 1299 #define DUK_USE_FLEX_ONESIZE | |
| 1300 | |
| 1301 /* Most portable, potentially wastes space */ | |
| 1302 #define DUK_USE_PACK_DUMMY_MEMBER | |
| 1303 #endif /* autodetect compiler */ | |
| 1304 | |
| 1305 /* uclibc */ | |
| 1306 #if defined(__UCLIBC__) | |
| 1307 #define DUK_F_UCLIBC | |
| 1308 #endif | |
| 1309 | |
| 1310 /* | |
| 1311 * Wrapper typedefs and constants for integer types, also sanity check types. | |
| 1312 * | |
| 1313 * C99 typedefs are quite good but not always available, and we want to avoid | |
| 1314 * forcibly redefining the C99 typedefs. So, there are Duktape wrappers for | |
| 1315 * all C99 typedefs and Duktape code should only use these typedefs. Type | |
| 1316 * detection when C99 is not supported is best effort and may end up detecting | |
| 1317 * some types incorrectly. | |
| 1318 * | |
| 1319 * Pointer sizes are a portability problem: pointers to different types may | |
| 1320 * have a different size and function pointers are very difficult to manage | |
| 1321 * portably. | |
| 1322 * | |
| 1323 * http://en.wikipedia.org/wiki/C_data_types#Fixed-width_integer_types | |
| 1324 * | |
| 1325 * Note: there's an interesting corner case when trying to define minimum | |
| 1326 * signed integer value constants which leads to the current workaround of | |
| 1327 * defining e.g. -0x80000000 as (-0x7fffffffL - 1L). See doc/code-issues.txt | |
| 1328 * for a longer discussion. | |
| 1329 * | |
| 1330 * Note: avoid typecasts and computations in macro integer constants as they | |
| 1331 * can then no longer be used in macro relational expressions (such as | |
| 1332 * #if DUK_SIZE_MAX < 0xffffffffUL). There is internal code which relies on | |
| 1333 * being able to compare DUK_SIZE_MAX against a limit. | |
| 1334 */ | |
| 1335 | |
| 1336 /* XXX: add feature options to force basic types from outside? */ | |
| 1337 | |
| 1338 #if !defined(INT_MAX) | |
| 1339 #error INT_MAX not defined | |
| 1340 #endif | |
| 1341 | |
| 1342 /* Check that architecture is two's complement, standard C allows e.g. | |
| 1343 * INT_MIN to be -2**31+1 (instead of -2**31). | |
| 1344 */ | |
| 1345 #if defined(INT_MAX) && defined(INT_MIN) | |
| 1346 #if INT_MAX != -(INT_MIN + 1) | |
| 1347 #error platform does not seem complement of two | |
| 1348 #endif | |
| 1349 #else | |
| 1350 #error cannot check complement of two | |
| 1351 #endif | |
| 1352 | |
| 1353 /* Pointer size determination based on __WORDSIZE or architecture when | |
| 1354 * that's not available. | |
| 1355 */ | |
| 1356 #if defined(DUK_F_X86) || defined(DUK_F_X32) || \ | |
| 1357 defined(DUK_F_M68K) || defined(DUK_F_PPC32) || \ | |
| 1358 defined(DUK_F_BCC) || \ | |
| 1359 (defined(__WORDSIZE) && (__WORDSIZE == 32)) | |
| 1360 #define DUK_F_32BIT_PTRS | |
| 1361 #elif defined(DUK_F_X64) || \ | |
| 1362 (defined(__WORDSIZE) && (__WORDSIZE == 64)) | |
| 1363 #define DUK_F_64BIT_PTRS | |
| 1364 #else | |
| 1365 /* not sure, not needed with C99 anyway */ | |
| 1366 #endif | |
| 1367 | |
| 1368 /* Intermediate define for 'have inttypes.h' */ | |
| 1369 #undef DUK_F_HAVE_INTTYPES | |
| 1370 #if defined(__STDC_VERSION__) && (__STDC_VERSION__ >= 199901L) && \ | |
| 1371 !(defined(DUK_F_AMIGAOS) && defined(DUK_F_VBCC)) | |
| 1372 /* vbcc + AmigaOS has C99 but no inttypes.h */ | |
| 1373 #define DUK_F_HAVE_INTTYPES | |
| 1374 #elif defined(__cplusplus) && (__cplusplus >= 201103L) | |
| 1375 /* C++11 apparently ratified stdint.h */ | |
| 1376 #define DUK_F_HAVE_INTTYPES | |
| 1377 #endif | |
| 1378 | |
| 1379 /* Basic integer typedefs and limits, preferably from inttypes.h, otherwise | |
| 1380 * through automatic detection. | |
| 1381 */ | |
| 1382 #if defined(DUK_F_HAVE_INTTYPES) | |
| 1383 /* C99 or compatible */ | |
| 1384 | |
| 1385 #define DUK_F_HAVE_64BIT | |
| 1386 #include <inttypes.h> | |
| 1387 | |
| 1388 typedef uint8_t duk_uint8_t; | |
| 1389 typedef int8_t duk_int8_t; | |
| 1390 typedef uint16_t duk_uint16_t; | |
| 1391 typedef int16_t duk_int16_t; | |
| 1392 typedef uint32_t duk_uint32_t; | |
| 1393 typedef int32_t duk_int32_t; | |
| 1394 typedef uint64_t duk_uint64_t; | |
| 1395 typedef int64_t duk_int64_t; | |
| 1396 typedef uint_least8_t duk_uint_least8_t; | |
| 1397 typedef int_least8_t duk_int_least8_t; | |
| 1398 typedef uint_least16_t duk_uint_least16_t; | |
| 1399 typedef int_least16_t duk_int_least16_t; | |
| 1400 typedef uint_least32_t duk_uint_least32_t; | |
| 1401 typedef int_least32_t duk_int_least32_t; | |
| 1402 typedef uint_least64_t duk_uint_least64_t; | |
| 1403 typedef int_least64_t duk_int_least64_t; | |
| 1404 typedef uint_fast8_t duk_uint_fast8_t; | |
| 1405 typedef int_fast8_t duk_int_fast8_t; | |
| 1406 typedef uint_fast16_t duk_uint_fast16_t; | |
| 1407 typedef int_fast16_t duk_int_fast16_t; | |
| 1408 typedef uint_fast32_t duk_uint_fast32_t; | |
| 1409 typedef int_fast32_t duk_int_fast32_t; | |
| 1410 typedef uint_fast64_t duk_uint_fast64_t; | |
| 1411 typedef int_fast64_t duk_int_fast64_t; | |
| 1412 typedef uintptr_t duk_uintptr_t; | |
| 1413 typedef intptr_t duk_intptr_t; | |
| 1414 typedef uintmax_t duk_uintmax_t; | |
| 1415 typedef intmax_t duk_intmax_t; | |
| 1416 | |
| 1417 #define DUK_UINT8_MIN 0 | |
| 1418 #define DUK_UINT8_MAX UINT8_MAX | |
| 1419 #define DUK_INT8_MIN INT8_MIN | |
| 1420 #define DUK_INT8_MAX INT8_MAX | |
| 1421 #define DUK_UINT_LEAST8_MIN 0 | |
| 1422 #define DUK_UINT_LEAST8_MAX UINT_LEAST8_MAX | |
| 1423 #define DUK_INT_LEAST8_MIN INT_LEAST8_MIN | |
| 1424 #define DUK_INT_LEAST8_MAX INT_LEAST8_MAX | |
| 1425 #define DUK_UINT_FAST8_MIN 0 | |
| 1426 #define DUK_UINT_FAST8_MAX UINT_FAST8_MAX | |
| 1427 #define DUK_INT_FAST8_MIN INT_FAST8_MIN | |
| 1428 #define DUK_INT_FAST8_MAX INT_FAST8_MAX | |
| 1429 #define DUK_UINT16_MIN 0 | |
| 1430 #define DUK_UINT16_MAX UINT16_MAX | |
| 1431 #define DUK_INT16_MIN INT16_MIN | |
| 1432 #define DUK_INT16_MAX INT16_MAX | |
| 1433 #define DUK_UINT_LEAST16_MIN 0 | |
| 1434 #define DUK_UINT_LEAST16_MAX UINT_LEAST16_MAX | |
| 1435 #define DUK_INT_LEAST16_MIN INT_LEAST16_MIN | |
| 1436 #define DUK_INT_LEAST16_MAX INT_LEAST16_MAX | |
| 1437 #define DUK_UINT_FAST16_MIN 0 | |
| 1438 #define DUK_UINT_FAST16_MAX UINT_FAST16_MAX | |
| 1439 #define DUK_INT_FAST16_MIN INT_FAST16_MIN | |
| 1440 #define DUK_INT_FAST16_MAX INT_FAST16_MAX | |
| 1441 #define DUK_UINT32_MIN 0 | |
| 1442 #define DUK_UINT32_MAX UINT32_MAX | |
| 1443 #define DUK_INT32_MIN INT32_MIN | |
| 1444 #define DUK_INT32_MAX INT32_MAX | |
| 1445 #define DUK_UINT_LEAST32_MIN 0 | |
| 1446 #define DUK_UINT_LEAST32_MAX UINT_LEAST32_MAX | |
| 1447 #define DUK_INT_LEAST32_MIN INT_LEAST32_MIN | |
| 1448 #define DUK_INT_LEAST32_MAX INT_LEAST32_MAX | |
| 1449 #define DUK_UINT_FAST32_MIN 0 | |
| 1450 #define DUK_UINT_FAST32_MAX UINT_FAST32_MAX | |
| 1451 #define DUK_INT_FAST32_MIN INT_FAST32_MIN | |
| 1452 #define DUK_INT_FAST32_MAX INT_FAST32_MAX | |
| 1453 #define DUK_UINT64_MIN 0 | |
| 1454 #define DUK_UINT64_MAX UINT64_MAX | |
| 1455 #define DUK_INT64_MIN INT64_MIN | |
| 1456 #define DUK_INT64_MAX INT64_MAX | |
| 1457 #define DUK_UINT_LEAST64_MIN 0 | |
| 1458 #define DUK_UINT_LEAST64_MAX UINT_LEAST64_MAX | |
| 1459 #define DUK_INT_LEAST64_MIN INT_LEAST64_MIN | |
| 1460 #define DUK_INT_LEAST64_MAX INT_LEAST64_MAX | |
| 1461 #define DUK_UINT_FAST64_MIN 0 | |
| 1462 #define DUK_UINT_FAST64_MAX UINT_FAST64_MAX | |
| 1463 #define DUK_INT_FAST64_MIN INT_FAST64_MIN | |
| 1464 #define DUK_INT_FAST64_MAX INT_FAST64_MAX | |
| 1465 | |
| 1466 #define DUK_UINTPTR_MIN 0 | |
| 1467 #define DUK_UINTPTR_MAX UINTPTR_MAX | |
| 1468 #define DUK_INTPTR_MIN INTPTR_MIN | |
| 1469 #define DUK_INTPTR_MAX INTPTR_MAX | |
| 1470 | |
| 1471 #define DUK_UINTMAX_MIN 0 | |
| 1472 #define DUK_UINTMAX_MAX UINTMAX_MAX | |
| 1473 #define DUK_INTMAX_MIN INTMAX_MIN | |
| 1474 #define DUK_INTMAX_MAX INTMAX_MAX | |
| 1475 | |
| 1476 #define DUK_SIZE_MIN 0 | |
| 1477 #define DUK_SIZE_MAX SIZE_MAX | |
| 1478 #undef DUK_SIZE_MAX_COMPUTED | |
| 1479 | |
| 1480 #else /* C99 types */ | |
| 1481 | |
| 1482 /* When C99 types are not available, we use heuristic detection to get | |
| 1483 * the basic 8, 16, 32, and (possibly) 64 bit types. The fast/least | |
| 1484 * types are then assumed to be exactly the same for now: these could | |
| 1485 * be improved per platform but C99 types are very often now available. | |
| 1486 * 64-bit types are not available on all platforms; this is OK at least | |
| 1487 * on 32-bit platforms. | |
| 1488 * | |
| 1489 * This detection code is necessarily a bit hacky and can provide typedefs | |
| 1490 * and defines that won't work correctly on some exotic platform. | |
| 1491 */ | |
| 1492 | |
| 1493 #if (defined(CHAR_BIT) && (CHAR_BIT == 8)) || \ | |
| 1494 (defined(UCHAR_MAX) && (UCHAR_MAX == 255)) | |
| 1495 typedef unsigned char duk_uint8_t; | |
| 1496 typedef signed char duk_int8_t; | |
| 1497 #else | |
| 1498 #error cannot detect 8-bit type | |
| 1499 #endif | |
| 1500 | |
| 1501 #if defined(USHRT_MAX) && (USHRT_MAX == 65535UL) | |
| 1502 typedef unsigned short duk_uint16_t; | |
| 1503 typedef signed short duk_int16_t; | |
| 1504 #elif defined(UINT_MAX) && (UINT_MAX == 65535UL) | |
| 1505 /* On some platforms int is 16-bit but long is 32-bit (e.g. PureC) */ | |
| 1506 typedef unsigned int duk_uint16_t; | |
| 1507 typedef signed int duk_int16_t; | |
| 1508 #else | |
| 1509 #error cannot detect 16-bit type | |
| 1510 #endif | |
| 1511 | |
| 1512 #if defined(UINT_MAX) && (UINT_MAX == 4294967295UL) | |
| 1513 typedef unsigned int duk_uint32_t; | |
| 1514 typedef signed int duk_int32_t; | |
| 1515 #elif defined(ULONG_MAX) && (ULONG_MAX == 4294967295UL) | |
| 1516 /* On some platforms int is 16-bit but long is 32-bit (e.g. PureC) */ | |
| 1517 typedef unsigned long duk_uint32_t; | |
| 1518 typedef signed long duk_int32_t; | |
| 1519 #else | |
| 1520 #error cannot detect 32-bit type | |
| 1521 #endif | |
| 1522 | |
| 1523 /* 64-bit type detection is a bit tricky. | |
| 1524 * | |
| 1525 * ULLONG_MAX is a standard define. __LONG_LONG_MAX__ and __ULONG_LONG_MAX__ | |
| 1526 * are used by at least GCC (even if system headers don't provide ULLONG_MAX). | |
| 1527 * Some GCC variants may provide __LONG_LONG_MAX__ but not __ULONG_LONG_MAX__. | |
| 1528 * | |
| 1529 * ULL / LL constants are rejected / warned about by some compilers, even if | |
| 1530 * the compiler has a 64-bit type and the compiler/system headers provide an | |
| 1531 * unsupported constant (ULL/LL)! Try to avoid using ULL / LL constants. | |
| 1532 * As a side effect we can only check that e.g. ULONG_MAX is larger than 32 | |
| 1533 * bits but can't be sure it is exactly 64 bits. Self tests will catch such | |
| 1534 * cases. | |
| 1535 */ | |
| 1536 #undef DUK_F_HAVE_64BIT | |
| 1537 #if !defined(DUK_F_HAVE_64BIT) && defined(ULONG_MAX) | |
| 1538 #if (ULONG_MAX > 4294967295UL) | |
| 1539 #define DUK_F_HAVE_64BIT | |
| 1540 typedef unsigned long duk_uint64_t; | |
| 1541 typedef signed long duk_int64_t; | |
| 1542 #endif | |
| 1543 #endif | |
| 1544 #if !defined(DUK_F_HAVE_64BIT) && defined(ULLONG_MAX) | |
| 1545 #if (ULLONG_MAX > 4294967295UL) | |
| 1546 #define DUK_F_HAVE_64BIT | |
| 1547 typedef unsigned long long duk_uint64_t; | |
| 1548 typedef signed long long duk_int64_t; | |
| 1549 #endif | |
| 1550 #endif | |
| 1551 #if !defined(DUK_F_HAVE_64BIT) && defined(__ULONG_LONG_MAX__) | |
| 1552 #if (__ULONG_LONG_MAX__ > 4294967295UL) | |
| 1553 #define DUK_F_HAVE_64BIT | |
| 1554 typedef unsigned long long duk_uint64_t; | |
| 1555 typedef signed long long duk_int64_t; | |
| 1556 #endif | |
| 1557 #endif | |
| 1558 #if !defined(DUK_F_HAVE_64BIT) && defined(__LONG_LONG_MAX__) | |
| 1559 #if (__LONG_LONG_MAX__ > 2147483647L) | |
| 1560 #define DUK_F_HAVE_64BIT | |
| 1561 typedef unsigned long long duk_uint64_t; | |
| 1562 typedef signed long long duk_int64_t; | |
| 1563 #endif | |
| 1564 #endif | |
| 1565 #if !defined(DUK_F_HAVE_64BIT) && \ | |
| 1566 (defined(DUK_F_MINGW) || defined(DUK_F_MSVC)) | |
| 1567 /* Both MinGW and MSVC have a 64-bit type. */ | |
| 1568 #define DUK_F_HAVE_64BIT | |
| 1569 typedef unsigned long duk_uint64_t; | |
| 1570 typedef signed long duk_int64_t; | |
| 1571 #endif | |
| 1572 #if !defined(DUK_F_HAVE_64BIT) | |
| 1573 /* cannot detect 64-bit type, not always needed so don't error */ | |
| 1574 #endif | |
| 1575 | |
| 1576 typedef duk_uint8_t duk_uint_least8_t; | |
| 1577 typedef duk_int8_t duk_int_least8_t; | |
| 1578 typedef duk_uint16_t duk_uint_least16_t; | |
| 1579 typedef duk_int16_t duk_int_least16_t; | |
| 1580 typedef duk_uint32_t duk_uint_least32_t; | |
| 1581 typedef duk_int32_t duk_int_least32_t; | |
| 1582 typedef duk_uint8_t duk_uint_fast8_t; | |
| 1583 typedef duk_int8_t duk_int_fast8_t; | |
| 1584 typedef duk_uint16_t duk_uint_fast16_t; | |
| 1585 typedef duk_int16_t duk_int_fast16_t; | |
| 1586 typedef duk_uint32_t duk_uint_fast32_t; | |
| 1587 typedef duk_int32_t duk_int_fast32_t; | |
| 1588 #if defined(DUK_F_HAVE_64BIT) | |
| 1589 typedef duk_uint64_t duk_uint_least64_t; | |
| 1590 typedef duk_int64_t duk_int_least64_t; | |
| 1591 typedef duk_uint64_t duk_uint_fast64_t; | |
| 1592 typedef duk_int64_t duk_int_fast64_t; | |
| 1593 #endif | |
| 1594 #if defined(DUK_F_HAVE_64BIT) | |
| 1595 typedef duk_uint64_t duk_uintmax_t; | |
| 1596 typedef duk_int64_t duk_intmax_t; | |
| 1597 #else | |
| 1598 typedef duk_uint32_t duk_uintmax_t; | |
| 1599 typedef duk_int32_t duk_intmax_t; | |
| 1600 #endif | |
| 1601 | |
| 1602 /* Note: the funny looking computations for signed minimum 16-bit, 32-bit, and | |
| 1603 * 64-bit values are intentional as the obvious forms (e.g. -0x80000000L) are | |
| 1604 * -not- portable. See code-issues.txt for a detailed discussion. | |
| 1605 */ | |
| 1606 #define DUK_UINT8_MIN 0UL | |
| 1607 #define DUK_UINT8_MAX 0xffUL | |
| 1608 #define DUK_INT8_MIN (-0x80L) | |
| 1609 #define DUK_INT8_MAX 0x7fL | |
| 1610 #define DUK_UINT_LEAST8_MIN 0UL | |
| 1611 #define DUK_UINT_LEAST8_MAX 0xffUL | |
| 1612 #define DUK_INT_LEAST8_MIN (-0x80L) | |
| 1613 #define DUK_INT_LEAST8_MAX 0x7fL | |
| 1614 #define DUK_UINT_FAST8_MIN 0UL | |
| 1615 #define DUK_UINT_FAST8_MAX 0xffUL | |
| 1616 #define DUK_INT_FAST8_MIN (-0x80L) | |
| 1617 #define DUK_INT_FAST8_MAX 0x7fL | |
| 1618 #define DUK_UINT16_MIN 0UL | |
| 1619 #define DUK_UINT16_MAX 0xffffUL | |
| 1620 #define DUK_INT16_MIN (-0x7fffL - 1L) | |
| 1621 #define DUK_INT16_MAX 0x7fffL | |
| 1622 #define DUK_UINT_LEAST16_MIN 0UL | |
| 1623 #define DUK_UINT_LEAST16_MAX 0xffffUL | |
| 1624 #define DUK_INT_LEAST16_MIN (-0x7fffL - 1L) | |
| 1625 #define DUK_INT_LEAST16_MAX 0x7fffL | |
| 1626 #define DUK_UINT_FAST16_MIN 0UL | |
| 1627 #define DUK_UINT_FAST16_MAX 0xffffUL | |
| 1628 #define DUK_INT_FAST16_MIN (-0x7fffL - 1L) | |
| 1629 #define DUK_INT_FAST16_MAX 0x7fffL | |
| 1630 #define DUK_UINT32_MIN 0UL | |
| 1631 #define DUK_UINT32_MAX 0xffffffffUL | |
| 1632 #define DUK_INT32_MIN (-0x7fffffffL - 1L) | |
| 1633 #define DUK_INT32_MAX 0x7fffffffL | |
| 1634 #define DUK_UINT_LEAST32_MIN 0UL | |
| 1635 #define DUK_UINT_LEAST32_MAX 0xffffffffUL | |
| 1636 #define DUK_INT_LEAST32_MIN (-0x7fffffffL - 1L) | |
| 1637 #define DUK_INT_LEAST32_MAX 0x7fffffffL | |
| 1638 #define DUK_UINT_FAST32_MIN 0UL | |
| 1639 #define DUK_UINT_FAST32_MAX 0xffffffffUL | |
| 1640 #define DUK_INT_FAST32_MIN (-0x7fffffffL - 1L) | |
| 1641 #define DUK_INT_FAST32_MAX 0x7fffffffL | |
| 1642 | |
| 1643 /* 64-bit constants. Since LL / ULL constants are not always available, | |
| 1644 * use computed values. These values can't be used in preprocessor | |
| 1645 * comparisons; flag them as such. | |
| 1646 */ | |
| 1647 #if defined(DUK_F_HAVE_64BIT) | |
| 1648 #define DUK_UINT64_MIN ((duk_uint64_t) 0) | |
| 1649 #define DUK_UINT64_MAX ((duk_uint64_t) -1) | |
| 1650 #define DUK_INT64_MIN ((duk_int64_t) (~(DUK_UINT64_MAX >> 1))) | |
| 1651 #define DUK_INT64_MAX ((duk_int64_t) (DUK_UINT64_MAX >> 1)) | |
| 1652 #define DUK_UINT_LEAST64_MIN DUK_UINT64_MIN | |
| 1653 #define DUK_UINT_LEAST64_MAX DUK_UINT64_MAX | |
| 1654 #define DUK_INT_LEAST64_MIN DUK_INT64_MIN | |
| 1655 #define DUK_INT_LEAST64_MAX DUK_INT64_MAX | |
| 1656 #define DUK_UINT_FAST64_MIN DUK_UINT64_MIN | |
| 1657 #define DUK_UINT_FAST64_MAX DUK_UINT64_MAX | |
| 1658 #define DUK_INT_FAST64_MIN DUK_INT64_MIN | |
| 1659 #define DUK_INT_FAST64_MAX DUK_INT64_MAX | |
| 1660 #define DUK_UINT64_MIN_COMPUTED | |
| 1661 #define DUK_UINT64_MAX_COMPUTED | |
| 1662 #define DUK_INT64_MIN_COMPUTED | |
| 1663 #define DUK_INT64_MAX_COMPUTED | |
| 1664 #define DUK_UINT_LEAST64_MIN_COMPUTED | |
| 1665 #define DUK_UINT_LEAST64_MAX_COMPUTED | |
| 1666 #define DUK_INT_LEAST64_MIN_COMPUTED | |
| 1667 #define DUK_INT_LEAST64_MAX_COMPUTED | |
| 1668 #define DUK_UINT_FAST64_MIN_COMPUTED | |
| 1669 #define DUK_UINT_FAST64_MAX_COMPUTED | |
| 1670 #define DUK_INT_FAST64_MIN_COMPUTED | |
| 1671 #define DUK_INT_FAST64_MAX_COMPUTED | |
| 1672 #endif | |
| 1673 | |
| 1674 #if defined(DUK_F_HAVE_64BIT) | |
| 1675 #define DUK_UINTMAX_MIN DUK_UINT64_MIN | |
| 1676 #define DUK_UINTMAX_MAX DUK_UINT64_MAX | |
| 1677 #define DUK_INTMAX_MIN DUK_INT64_MIN | |
| 1678 #define DUK_INTMAX_MAX DUK_INT64_MAX | |
| 1679 #define DUK_UINTMAX_MIN_COMPUTED | |
| 1680 #define DUK_UINTMAX_MAX_COMPUTED | |
| 1681 #define DUK_INTMAX_MIN_COMPUTED | |
| 1682 #define DUK_INTMAX_MAX_COMPUTED | |
| 1683 #else | |
| 1684 #define DUK_UINTMAX_MIN 0UL | |
| 1685 #define DUK_UINTMAX_MAX 0xffffffffUL | |
| 1686 #define DUK_INTMAX_MIN (-0x7fffffffL - 1L) | |
| 1687 #define DUK_INTMAX_MAX 0x7fffffffL | |
| 1688 #endif | |
| 1689 | |
| 1690 /* This detection is not very reliable. */ | |
| 1691 #if defined(DUK_F_32BIT_PTRS) | |
| 1692 typedef duk_int32_t duk_intptr_t; | |
| 1693 typedef duk_uint32_t duk_uintptr_t; | |
| 1694 #define DUK_UINTPTR_MIN DUK_UINT32_MIN | |
| 1695 #define DUK_UINTPTR_MAX DUK_UINT32_MAX | |
| 1696 #define DUK_INTPTR_MIN DUK_INT32_MIN | |
| 1697 #define DUK_INTPTR_MAX DUK_INT32_MAX | |
| 1698 #elif defined(DUK_F_64BIT_PTRS) && defined(DUK_F_HAVE_64BIT) | |
| 1699 typedef duk_int64_t duk_intptr_t; | |
| 1700 typedef duk_uint64_t duk_uintptr_t; | |
| 1701 #define DUK_UINTPTR_MIN DUK_UINT64_MIN | |
| 1702 #define DUK_UINTPTR_MAX DUK_UINT64_MAX | |
| 1703 #define DUK_INTPTR_MIN DUK_INT64_MIN | |
| 1704 #define DUK_INTPTR_MAX DUK_INT64_MAX | |
| 1705 #define DUK_UINTPTR_MIN_COMPUTED | |
| 1706 #define DUK_UINTPTR_MAX_COMPUTED | |
| 1707 #define DUK_INTPTR_MIN_COMPUTED | |
| 1708 #define DUK_INTPTR_MAX_COMPUTED | |
| 1709 #else | |
| 1710 #error cannot determine intptr type | |
| 1711 #endif | |
| 1712 | |
| 1713 /* SIZE_MAX may be missing so use an approximate value for it. */ | |
| 1714 #undef DUK_SIZE_MAX_COMPUTED | |
| 1715 #if !defined(SIZE_MAX) | |
| 1716 #define DUK_SIZE_MAX_COMPUTED | |
| 1717 #define SIZE_MAX ((size_t) (-1)) | |
| 1718 #endif | |
| 1719 #define DUK_SIZE_MIN 0 | |
| 1720 #define DUK_SIZE_MAX SIZE_MAX | |
| 1721 | |
| 1722 #endif /* C99 types */ | |
| 1723 | |
| 1724 /* A few types are assumed to always exist. */ | |
| 1725 typedef size_t duk_size_t; | |
| 1726 typedef ptrdiff_t duk_ptrdiff_t; | |
| 1727 | |
| 1728 /* The best type for an "all around int" in Duktape internals is "at least | |
| 1729 * 32 bit signed integer" which is most convenient. Same for unsigned type. | |
| 1730 * Prefer 'int' when large enough, as it is almost always a convenient type. | |
| 1731 */ | |
| 1732 #if defined(UINT_MAX) && (UINT_MAX >= 0xffffffffUL) | |
| 1733 typedef int duk_int_t; | |
| 1734 typedef unsigned int duk_uint_t; | |
| 1735 #define DUK_INT_MIN INT_MIN | |
| 1736 #define DUK_INT_MAX INT_MAX | |
| 1737 #define DUK_UINT_MIN 0 | |
| 1738 #define DUK_UINT_MAX UINT_MAX | |
| 1739 #else | |
| 1740 typedef duk_int_fast32_t duk_int_t; | |
| 1741 typedef duk_uint_fast32_t duk_uint_t; | |
| 1742 #define DUK_INT_MIN DUK_INT_FAST32_MIN | |
| 1743 #define DUK_INT_MAX DUK_INT_FAST32_MAX | |
| 1744 #define DUK_UINT_MIN DUK_UINT_FAST32_MIN | |
| 1745 #define DUK_UINT_MAX DUK_UINT_FAST32_MAX | |
| 1746 #endif | |
| 1747 | |
| 1748 /* Same as 'duk_int_t' but guaranteed to be a 'fast' variant if this | |
| 1749 * distinction matters for the CPU. These types are used mainly in the | |
| 1750 * executor where it might really matter. | |
| 1751 */ | |
| 1752 typedef duk_int_fast32_t duk_int_fast_t; | |
| 1753 typedef duk_uint_fast32_t duk_uint_fast_t; | |
| 1754 #define DUK_INT_FAST_MIN DUK_INT_FAST32_MIN | |
| 1755 #define DUK_INT_FAST_MAX DUK_INT_FAST32_MAX | |
| 1756 #define DUK_UINT_FAST_MIN DUK_UINT_FAST32_MIN | |
| 1757 #define DUK_UINT_FAST_MAX DUK_UINT_FAST32_MAX | |
| 1758 | |
| 1759 /* Small integers (16 bits or more) can fall back to the 'int' type, but | |
| 1760 * have a typedef so they are marked "small" explicitly. | |
| 1761 */ | |
| 1762 typedef int duk_small_int_t; | |
| 1763 typedef unsigned int duk_small_uint_t; | |
| 1764 #define DUK_SMALL_INT_MIN INT_MIN | |
| 1765 #define DUK_SMALL_INT_MAX INT_MAX | |
| 1766 #define DUK_SMALL_UINT_MIN 0 | |
| 1767 #define DUK_SMALL_UINT_MAX UINT_MAX | |
| 1768 | |
| 1769 /* Fast variants of small integers, again for really fast paths like the | |
| 1770 * executor. | |
| 1771 */ | |
| 1772 typedef duk_int_fast16_t duk_small_int_fast_t; | |
| 1773 typedef duk_uint_fast16_t duk_small_uint_fast_t; | |
| 1774 #define DUK_SMALL_INT_FAST_MIN DUK_INT_FAST16_MIN | |
| 1775 #define DUK_SMALL_INT_FAST_MAX DUK_INT_FAST16_MAX | |
| 1776 #define DUK_SMALL_UINT_FAST_MIN DUK_UINT_FAST16_MIN | |
| 1777 #define DUK_SMALL_UINT_FAST_MAX DUK_UINT_FAST16_MAX | |
| 1778 | |
| 1779 /* Boolean values are represented with the platform 'int'. */ | |
| 1780 typedef duk_small_int_t duk_bool_t; | |
| 1781 #define DUK_BOOL_MIN DUK_SMALL_INT_MIN | |
| 1782 #define DUK_BOOL_MAX DUK_SMALL_INT_MAX | |
| 1783 | |
| 1784 /* Index values must have at least 32-bit signed range. */ | |
| 1785 typedef duk_int_t duk_idx_t; | |
| 1786 #define DUK_IDX_MIN DUK_INT_MIN | |
| 1787 #define DUK_IDX_MAX DUK_INT_MAX | |
| 1788 | |
| 1789 /* Unsigned index variant. */ | |
| 1790 typedef duk_uint_t duk_uidx_t; | |
| 1791 #define DUK_UIDX_MIN DUK_UINT_MIN | |
| 1792 #define DUK_UIDX_MAX DUK_UINT_MAX | |
| 1793 | |
| 1794 /* Array index values, could be exact 32 bits. | |
| 1795 * Currently no need for signed duk_arridx_t. | |
| 1796 */ | |
| 1797 typedef duk_uint_t duk_uarridx_t; | |
| 1798 #define DUK_UARRIDX_MIN DUK_UINT_MIN | |
| 1799 #define DUK_UARRIDX_MAX DUK_UINT_MAX | |
| 1800 | |
| 1801 /* Duktape/C function return value, platform int is enough for now to | |
| 1802 * represent 0, 1, or negative error code. Must be compatible with | |
| 1803 * assigning truth values (e.g. duk_ret_t rc = (foo == bar);). | |
| 1804 */ | |
| 1805 typedef duk_small_int_t duk_ret_t; | |
| 1806 #define DUK_RET_MIN DUK_SMALL_INT_MIN | |
| 1807 #define DUK_RET_MAX DUK_SMALL_INT_MAX | |
| 1808 | |
| 1809 /* Error codes are represented with platform int. High bits are used | |
| 1810 * for flags and such, so 32 bits are needed. | |
| 1811 */ | |
| 1812 typedef duk_int_t duk_errcode_t; | |
| 1813 #define DUK_ERRCODE_MIN DUK_INT_MIN | |
| 1814 #define DUK_ERRCODE_MAX DUK_INT_MAX | |
| 1815 | |
| 1816 /* Codepoint type. Must be 32 bits or more because it is used also for | |
| 1817 * internal codepoints. The type is signed because negative codepoints | |
| 1818 * are used as internal markers (e.g. to mark EOF or missing argument). | |
| 1819 * (X)UTF-8/CESU-8 encode/decode take and return an unsigned variant to | |
| 1820 * ensure duk_uint32_t casts back and forth nicely. Almost everything | |
| 1821 * else uses the signed one. | |
| 1822 */ | |
| 1823 typedef duk_int_t duk_codepoint_t; | |
| 1824 typedef duk_uint_t duk_ucodepoint_t; | |
| 1825 #define DUK_CODEPOINT_MIN DUK_INT_MIN | |
| 1826 #define DUK_CODEPOINT_MAX DUK_INT_MAX | |
| 1827 #define DUK_UCODEPOINT_MIN DUK_UINT_MIN | |
| 1828 #define DUK_UCODEPOINT_MAX DUK_UINT_MAX | |
| 1829 | |
| 1830 /* IEEE float/double typedef. */ | |
| 1831 typedef float duk_float_t; | |
| 1832 typedef double duk_double_t; | |
| 1833 | |
| 1834 /* We're generally assuming that we're working on a platform with a 32-bit | |
| 1835 * address space. If DUK_SIZE_MAX is a typecast value (which is necessary | |
| 1836 * if SIZE_MAX is missing), the check must be avoided because the | |
| 1837 * preprocessor can't do a comparison. | |
| 1838 */ | |
| 1839 #if !defined(DUK_SIZE_MAX) | |
| 1840 #error DUK_SIZE_MAX is undefined, probably missing SIZE_MAX | |
| 1841 #elif !defined(DUK_SIZE_MAX_COMPUTED) | |
| 1842 #if DUK_SIZE_MAX < 0xffffffffUL | |
| 1843 /* On some systems SIZE_MAX can be smaller than max unsigned 32-bit value | |
| 1844 * which seems incorrect if size_t is (at least) an unsigned 32-bit type. | |
| 1845 * However, it doesn't seem useful to error out compilation if this is the | |
| 1846 * case. | |
| 1847 */ | |
| 1848 #endif | |
| 1849 #endif | |
| 1850 | |
| 1851 /* Type for public API calls. */ | |
| 1852 typedef struct duk_hthread duk_context; | |
| 1853 | |
| 1854 /* Check whether we should use 64-bit integers or not. | |
| 1855 * | |
| 1856 * Quite incomplete now. Use 64-bit types if detected (C99 or other detection) | |
| 1857 * unless they are known to be unreliable. For instance, 64-bit types are | |
| 1858 * available on VBCC but seem to misbehave. | |
| 1859 */ | |
| 1860 #if defined(DUK_F_HAVE_64BIT) && !defined(DUK_F_VBCC) | |
| 1861 #define DUK_USE_64BIT_OPS | |
| 1862 #else | |
| 1863 #undef DUK_USE_64BIT_OPS | |
| 1864 #endif | |
| 1865 | |
| 1866 /* | |
| 1867 * Fill-ins for platform, architecture, and compiler | |
| 1868 */ | |
| 1869 | |
| 1870 #if !defined(DUK_SETJMP) | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1871 #define DUK_JMPBUF_TYPE jmp_buf |
| 3 | 1872 #define DUK_SETJMP(jb) setjmp((jb)) |
| 1873 #define DUK_LONGJMP(jb) longjmp((jb), 1) | |
| 1874 #endif | |
| 1875 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1876 #if 0 |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1877 /* sigsetjmp() alternative */ |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1878 #define DUK_JMPBUF_TYPE sigjmp_buf |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1879 #define DUK_SETJMP(jb) sigsetjmp((jb)) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1880 #define DUK_LONGJMP(jb) siglongjmp((jb), 1) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1881 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
1882 |
| 3 | 1883 typedef FILE duk_file; |
| 1884 #if !defined(DUK_STDIN) | |
| 1885 #define DUK_STDIN stdin | |
| 1886 #endif | |
| 1887 #if !defined(DUK_STDOUT) | |
| 1888 #define DUK_STDOUT stdout | |
| 1889 #endif | |
| 1890 #if !defined(DUK_STDERR) | |
| 1891 #define DUK_STDERR stderr | |
| 1892 #endif | |
| 1893 | |
| 1894 /* Special naming to avoid conflict with e.g. DUK_FREE() in duk_heap.h | |
| 1895 * (which is unfortunately named). May sometimes need replacement, e.g. | |
| 1896 * some compilers don't handle zero length or NULL correctly in realloc(). | |
| 1897 */ | |
| 1898 #if !defined(DUK_ANSI_MALLOC) | |
| 1899 #define DUK_ANSI_MALLOC malloc | |
| 1900 #endif | |
| 1901 #if !defined(DUK_ANSI_REALLOC) | |
| 1902 #define DUK_ANSI_REALLOC realloc | |
| 1903 #endif | |
| 1904 #if !defined(DUK_ANSI_CALLOC) | |
| 1905 #define DUK_ANSI_CALLOC calloc | |
| 1906 #endif | |
| 1907 #if !defined(DUK_ANSI_FREE) | |
| 1908 #define DUK_ANSI_FREE free | |
| 1909 #endif | |
| 1910 | |
| 1911 /* ANSI C (various versions) and some implementations require that the | |
| 1912 * pointer arguments to memset(), memcpy(), and memmove() be valid values | |
| 1913 * even when byte size is 0 (even a NULL pointer is considered invalid in | |
| 1914 * this context). Zero-size operations as such are allowed, as long as their | |
| 1915 * pointer arguments point to a valid memory area. The DUK_MEMSET(), | |
| 1916 * DUK_MEMCPY(), and DUK_MEMMOVE() macros require this same behavior, i.e.: | |
| 1917 * (1) pointers must be valid and non-NULL, (2) zero size must otherwise be | |
| 1918 * allowed. If these are not fulfilled, a macro wrapper is needed. | |
| 1919 * | |
| 1920 * http://stackoverflow.com/questions/5243012/is-it-guaranteed-to-be-safe-to-perform-memcpy0-0-0 | |
| 1921 * http://lists.cs.uiuc.edu/pipermail/llvmdev/2007-October/011065.html | |
| 1922 * | |
| 1923 * Not sure what's the required behavior when a pointer points just past the | |
| 1924 * end of a buffer, which often happens in practice (e.g. zero size memmoves). | |
| 1925 * For example, if allocation size is 3, the following pointer would not | |
| 1926 * technically point to a valid memory byte: | |
| 1927 * | |
| 1928 * <-- alloc --> | |
| 1929 * | 0 | 1 | 2 | ..... | |
| 1930 * ^-- p=3, points after last valid byte (2) | |
| 1931 */ | |
| 1932 #if !defined(DUK_MEMCPY) | |
| 1933 #if defined(DUK_F_UCLIBC) | |
| 1934 /* Old uclibcs have a broken memcpy so use memmove instead (this is overly wide | |
| 1935 * now on purpose): http://lists.uclibc.org/pipermail/uclibc-cvs/2008-October/025511.html | |
| 1936 */ | |
| 1937 #define DUK_MEMCPY memmove | |
| 1938 #else | |
| 1939 #define DUK_MEMCPY memcpy | |
| 1940 #endif | |
| 1941 #endif | |
| 1942 #if !defined(DUK_MEMMOVE) | |
| 1943 #define DUK_MEMMOVE memmove | |
| 1944 #endif | |
| 1945 #if !defined(DUK_MEMCMP) | |
| 1946 #define DUK_MEMCMP memcmp | |
| 1947 #endif | |
| 1948 #if !defined(DUK_MEMSET) | |
| 1949 #define DUK_MEMSET memset | |
| 1950 #endif | |
| 1951 #if !defined(DUK_STRLEN) | |
| 1952 #define DUK_STRLEN strlen | |
| 1953 #endif | |
| 1954 #if !defined(DUK_STRCMP) | |
| 1955 #define DUK_STRCMP strcmp | |
| 1956 #endif | |
| 1957 #if !defined(DUK_STRNCMP) | |
| 1958 #define DUK_STRNCMP strncmp | |
| 1959 #endif | |
| 1960 #if !defined(DUK_PRINTF) | |
| 1961 #define DUK_PRINTF printf | |
| 1962 #endif | |
| 1963 #if !defined(DUK_FPRINTF) | |
| 1964 #define DUK_FPRINTF fprintf | |
| 1965 #endif | |
| 1966 #if !defined(DUK_SPRINTF) | |
| 1967 #define DUK_SPRINTF sprintf | |
| 1968 #endif | |
| 1969 #if !defined(DUK_SNPRINTF) | |
| 1970 /* snprintf() is technically not part of C89 but usually available. */ | |
| 1971 #define DUK_SNPRINTF snprintf | |
| 1972 #endif | |
| 1973 #if !defined(DUK_VSPRINTF) | |
| 1974 #define DUK_VSPRINTF vsprintf | |
| 1975 #endif | |
| 1976 #if !defined(DUK_VSNPRINTF) | |
| 1977 /* vsnprintf() is technically not part of C89 but usually available. */ | |
| 1978 #define DUK_VSNPRINTF vsnprintf | |
| 1979 #endif | |
| 1980 #if !defined(DUK_SSCANF) | |
| 1981 #define DUK_SSCANF sscanf | |
| 1982 #endif | |
| 1983 #if !defined(DUK_VSSCANF) | |
| 1984 #define DUK_VSSCANF vsscanf | |
| 1985 #endif | |
| 1986 #if !defined(DUK_FOPEN) | |
| 1987 #define DUK_FOPEN fopen | |
| 1988 #endif | |
| 1989 #if !defined(DUK_FCLOSE) | |
| 1990 #define DUK_FCLOSE fclose | |
| 1991 #endif | |
| 1992 #if !defined(DUK_FREAD) | |
| 1993 #define DUK_FREAD fread | |
| 1994 #endif | |
| 1995 #if !defined(DUK_FWRITE) | |
| 1996 #define DUK_FWRITE fwrite | |
| 1997 #endif | |
| 1998 #if !defined(DUK_FSEEK) | |
| 1999 #define DUK_FSEEK fseek | |
| 2000 #endif | |
| 2001 #if !defined(DUK_FTELL) | |
| 2002 #define DUK_FTELL ftell | |
| 2003 #endif | |
| 2004 #if !defined(DUK_FFLUSH) | |
| 2005 #define DUK_FFLUSH fflush | |
| 2006 #endif | |
| 2007 #if !defined(DUK_FPUTC) | |
| 2008 #define DUK_FPUTC fputc | |
| 2009 #endif | |
| 2010 #if !defined(DUK_MEMZERO) | |
| 2011 #define DUK_MEMZERO(p,n) DUK_MEMSET((p), 0, (n)) | |
| 2012 #endif | |
| 2013 #if !defined(DUK_ABORT) | |
| 2014 #define DUK_ABORT abort | |
| 2015 #endif | |
| 2016 #if !defined(DUK_EXIT) | |
| 2017 #define DUK_EXIT exit | |
| 2018 #endif | |
| 2019 | |
| 2020 #if !defined(DUK_DOUBLE_2TO32) | |
| 2021 #define DUK_DOUBLE_2TO32 4294967296.0 | |
| 2022 #endif | |
| 2023 #if !defined(DUK_DOUBLE_2TO31) | |
| 2024 #define DUK_DOUBLE_2TO31 2147483648.0 | |
| 2025 #endif | |
| 2026 | |
| 2027 #if !defined(DUK_DOUBLE_INFINITY) | |
| 2028 #undef DUK_USE_COMPUTED_INFINITY | |
| 2029 #if defined(DUK_F_GCC_VERSION) && (DUK_F_GCC_VERSION < 40600) | |
| 2030 /* GCC older than 4.6: avoid overflow warnings related to using INFINITY */ | |
| 2031 #define DUK_DOUBLE_INFINITY (__builtin_inf()) | |
| 2032 #elif defined(INFINITY) | |
| 2033 #define DUK_DOUBLE_INFINITY ((double) INFINITY) | |
| 2034 #elif !defined(DUK_F_VBCC) && !defined(DUK_F_MSVC) && !defined(DUK_F_BCC) | |
| 2035 #define DUK_DOUBLE_INFINITY (1.0 / 0.0) | |
| 2036 #else | |
| 2037 /* In VBCC (1.0 / 0.0) results in a warning and 0.0 instead of infinity. | |
| 2038 * Use a computed infinity (initialized when a heap is created at the | |
| 2039 * latest). | |
| 2040 */ | |
| 2041 #define DUK_USE_COMPUTED_INFINITY | |
| 2042 #define DUK_DOUBLE_INFINITY duk_computed_infinity | |
| 2043 #endif | |
| 2044 #endif | |
| 2045 | |
| 2046 #if !defined(DUK_DOUBLE_NAN) | |
| 2047 #undef DUK_USE_COMPUTED_NAN | |
| 2048 #if defined(NAN) | |
| 2049 #define DUK_DOUBLE_NAN NAN | |
| 2050 #elif !defined(DUK_F_VBCC) && !defined(DUK_F_MSVC) && !defined(DUK_F_BCC) | |
| 2051 #define DUK_DOUBLE_NAN (0.0 / 0.0) | |
| 2052 #else | |
| 2053 /* In VBCC (0.0 / 0.0) results in a warning and 0.0 instead of NaN. | |
| 2054 * In MSVC (VS2010 Express) (0.0 / 0.0) results in a compile error. | |
| 2055 * Use a computed NaN (initialized when a heap is created at the | |
| 2056 * latest). | |
| 2057 */ | |
| 2058 #define DUK_USE_COMPUTED_NAN | |
| 2059 #define DUK_DOUBLE_NAN duk_computed_nan | |
| 2060 #endif | |
| 2061 #endif | |
| 2062 | |
| 2063 /* Many platforms are missing fpclassify() and friends, so use replacements | |
| 2064 * if necessary. The replacement constants (FP_NAN etc) can be anything but | |
| 2065 * match Linux constants now. | |
| 2066 */ | |
| 2067 #undef DUK_USE_REPL_FPCLASSIFY | |
| 2068 #undef DUK_USE_REPL_SIGNBIT | |
| 2069 #undef DUK_USE_REPL_ISFINITE | |
| 2070 #undef DUK_USE_REPL_ISNAN | |
| 2071 #undef DUK_USE_REPL_ISINF | |
| 2072 | |
| 2073 /* Complex condition broken into separate parts. */ | |
| 2074 #undef DUK_F_USE_REPL_ALL | |
| 2075 #if !(defined(FP_NAN) && defined(FP_INFINITE) && defined(FP_ZERO) && \ | |
| 2076 defined(FP_SUBNORMAL) && defined(FP_NORMAL)) | |
| 2077 /* Missing some obvious constants. */ | |
| 2078 #define DUK_F_USE_REPL_ALL | |
| 2079 #elif defined(DUK_F_AMIGAOS) && defined(DUK_F_VBCC) | |
| 2080 /* VBCC is missing the built-ins even in C99 mode (perhaps a header issue) */ | |
| 2081 #define DUK_F_USE_REPL_ALL | |
| 2082 #elif defined(DUK_F_FREEBSD) && defined(DUK_F_CLANG) | |
| 2083 /* Placeholder fix for (detection is wider than necessary): | |
| 2084 * http://llvm.org/bugs/show_bug.cgi?id=17788 | |
| 2085 */ | |
| 2086 #define DUK_F_USE_REPL_ALL | |
| 2087 #elif defined(DUK_F_UCLIBC) | |
| 2088 /* At least some uclibc versions have broken floating point math. For | |
| 2089 * example, fpclassify() can incorrectly classify certain NaN formats. | |
| 2090 * To be safe, use replacements. | |
| 2091 */ | |
| 2092 #define DUK_F_USE_REPL_ALL | |
| 2093 #endif | |
| 2094 | |
| 2095 #if defined(DUK_F_USE_REPL_ALL) | |
| 2096 #define DUK_USE_REPL_FPCLASSIFY | |
| 2097 #define DUK_USE_REPL_SIGNBIT | |
| 2098 #define DUK_USE_REPL_ISFINITE | |
| 2099 #define DUK_USE_REPL_ISNAN | |
| 2100 #define DUK_USE_REPL_ISINF | |
| 2101 #define DUK_FPCLASSIFY duk_repl_fpclassify | |
| 2102 #define DUK_SIGNBIT duk_repl_signbit | |
| 2103 #define DUK_ISFINITE duk_repl_isfinite | |
| 2104 #define DUK_ISNAN duk_repl_isnan | |
| 2105 #define DUK_ISINF duk_repl_isinf | |
| 2106 #define DUK_FP_NAN 0 | |
| 2107 #define DUK_FP_INFINITE 1 | |
| 2108 #define DUK_FP_ZERO 2 | |
| 2109 #define DUK_FP_SUBNORMAL 3 | |
| 2110 #define DUK_FP_NORMAL 4 | |
| 2111 #else | |
| 2112 #define DUK_FPCLASSIFY fpclassify | |
| 2113 #define DUK_SIGNBIT signbit | |
| 2114 #define DUK_ISFINITE isfinite | |
| 2115 #define DUK_ISNAN isnan | |
| 2116 #define DUK_ISINF isinf | |
| 2117 #define DUK_FP_NAN FP_NAN | |
| 2118 #define DUK_FP_INFINITE FP_INFINITE | |
| 2119 #define DUK_FP_ZERO FP_ZERO | |
| 2120 #define DUK_FP_SUBNORMAL FP_SUBNORMAL | |
| 2121 #define DUK_FP_NORMAL FP_NORMAL | |
| 2122 #endif | |
| 2123 | |
| 2124 #if defined(DUK_F_USE_REPL_ALL) | |
| 2125 #undef DUK_F_USE_REPL_ALL | |
| 2126 #endif | |
| 2127 | |
| 2128 /* Some math functions are C99 only. This is also an issue with some | |
| 2129 * embedded environments using uclibc where uclibc has been configured | |
| 2130 * not to provide some functions. For now, use replacements whenever | |
| 2131 * using uclibc. | |
| 2132 */ | |
| 2133 #undef DUK_USE_MATH_FMIN | |
| 2134 #undef DUK_USE_MATH_FMAX | |
| 2135 #undef DUK_USE_MATH_ROUND | |
| 2136 #if defined(DUK_F_UCLIBC) | |
| 2137 /* uclibc may be missing these */ | |
| 2138 #elif defined(DUK_F_AMIGAOS) && defined(DUK_F_VBCC) | |
| 2139 /* vbcc + AmigaOS may be missing these */ | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2140 #elif defined(DUK_F_MINT) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2141 /* mint clib is missing these */ |
| 3 | 2142 #elif !defined(DUK_F_C99) && !defined(DUK_F_CPP11) |
| 2143 /* build is not C99 or C++11, play it safe */ | |
| 2144 #else | |
| 2145 /* C99 or C++11, no known issues */ | |
| 2146 #define DUK_USE_MATH_FMIN | |
| 2147 #define DUK_USE_MATH_FMAX | |
| 2148 #define DUK_USE_MATH_ROUND | |
| 2149 #endif | |
| 2150 | |
| 2151 /* These functions don't currently need replacement but are wrapped for | |
| 2152 * completeness. Because these are used as function pointers, they need | |
| 2153 * to be defined as concrete C functions (not macros). | |
| 2154 */ | |
| 2155 #if !defined(DUK_FABS) | |
| 2156 #define DUK_FABS fabs | |
| 2157 #endif | |
| 2158 #if !defined(DUK_FMIN) | |
| 2159 #define DUK_FMIN fmin | |
| 2160 #endif | |
| 2161 #if !defined(DUK_FMAX) | |
| 2162 #define DUK_FMAX fmax | |
| 2163 #endif | |
| 2164 #if !defined(DUK_FLOOR) | |
| 2165 #define DUK_FLOOR floor | |
| 2166 #endif | |
| 2167 #if !defined(DUK_CEIL) | |
| 2168 #define DUK_CEIL ceil | |
| 2169 #endif | |
| 2170 #if !defined(DUK_FMOD) | |
| 2171 #define DUK_FMOD fmod | |
| 2172 #endif | |
| 2173 #if !defined(DUK_POW) | |
| 2174 #define DUK_POW pow | |
| 2175 #endif | |
| 2176 #if !defined(DUK_ACOS) | |
| 2177 #define DUK_ACOS acos | |
| 2178 #endif | |
| 2179 #if !defined(DUK_ASIN) | |
| 2180 #define DUK_ASIN asin | |
| 2181 #endif | |
| 2182 #if !defined(DUK_ATAN) | |
| 2183 #define DUK_ATAN atan | |
| 2184 #endif | |
| 2185 #if !defined(DUK_ATAN2) | |
| 2186 #define DUK_ATAN2 atan2 | |
| 2187 #endif | |
| 2188 #if !defined(DUK_SIN) | |
| 2189 #define DUK_SIN sin | |
| 2190 #endif | |
| 2191 #if !defined(DUK_COS) | |
| 2192 #define DUK_COS cos | |
| 2193 #endif | |
| 2194 #if !defined(DUK_TAN) | |
| 2195 #define DUK_TAN tan | |
| 2196 #endif | |
| 2197 #if !defined(DUK_EXP) | |
| 2198 #define DUK_EXP exp | |
| 2199 #endif | |
| 2200 #if !defined(DUK_LOG) | |
| 2201 #define DUK_LOG log | |
| 2202 #endif | |
| 2203 #if !defined(DUK_SQRT) | |
| 2204 #define DUK_SQRT sqrt | |
| 2205 #endif | |
| 2206 | |
| 2207 /* NetBSD 6.0 x86 (at least) has a few problems with pow() semantics, | |
| 2208 * see test-bug-netbsd-math-pow.js. Use NetBSD specific workaround. | |
| 2209 * (This might be a wider problem; if so, generalize the define name.) | |
| 2210 */ | |
| 2211 #undef DUK_USE_POW_NETBSD_WORKAROUND | |
| 2212 #if defined(DUK_F_NETBSD) | |
| 2213 #define DUK_USE_POW_NETBSD_WORKAROUND | |
| 2214 #endif | |
| 2215 | |
| 2216 /* Rely as little as possible on compiler behavior for NaN comparison, | |
| 2217 * signed zero handling, etc. Currently never activated but may be needed | |
| 2218 * for broken compilers. | |
| 2219 */ | |
| 2220 #undef DUK_USE_PARANOID_MATH | |
| 2221 | |
| 2222 /* There was a curious bug where test-bi-date-canceling.js would fail e.g. | |
| 2223 * on 64-bit Ubuntu, gcc-4.8.1, -m32, and no -std=c99. Some date computations | |
| 2224 * using doubles would be optimized which then broke some corner case tests. | |
| 2225 * The problem goes away by adding 'volatile' to the datetime computations. | |
| 2226 * Not sure what the actual triggering conditions are, but using this on | |
| 2227 * non-C99 systems solves the known issues and has relatively little cost | |
| 2228 * on other platforms. | |
| 2229 */ | |
| 2230 #undef DUK_USE_PARANOID_DATE_COMPUTATION | |
| 2231 #if !defined(DUK_F_C99) | |
| 2232 #define DUK_USE_PARANOID_DATE_COMPUTATION | |
| 2233 #endif | |
| 2234 | |
| 2235 /* | |
| 2236 * Byte order and double memory layout detection | |
| 2237 * | |
| 2238 * Endianness detection is a major portability hassle because the macros | |
| 2239 * and headers are not standardized. There's even variance across UNIX | |
| 2240 * platforms. Even with "standard" headers, details like underscore count | |
| 2241 * varies between platforms, e.g. both __BYTE_ORDER and _BYTE_ORDER are used | |
| 2242 * (Crossbridge has a single underscore, for instance). | |
| 2243 * | |
| 2244 * The checks below are structured with this in mind: several approaches are | |
| 2245 * used, and at the end we check if any of them worked. This allows generic | |
| 2246 * approaches to be tried first, and platform/compiler specific hacks tried | |
| 2247 * last. As a last resort, the user can force a specific endianness, as it's | |
| 2248 * not likely that automatic detection will work on the most exotic platforms. | |
| 2249 * | |
| 2250 * Duktape supports little and big endian machines. There's also support | |
| 2251 * for a hybrid used by some ARM machines where integers are little endian | |
| 2252 * but IEEE double values use a mixed order (12345678 -> 43218765). This | |
| 2253 * byte order for doubles is referred to as "mixed endian". | |
| 2254 */ | |
| 2255 | |
| 2256 /* For custom platforms allow user to define byteorder explicitly. | |
| 2257 * Since endianness headers are not standardized, this is a useful | |
| 2258 * workaround for custom platforms for which endianness detection | |
| 2259 * is not directly supported. Perhaps custom hardware is used and | |
| 2260 * user cannot submit upstream patches. | |
| 2261 */ | |
| 2262 #if defined(DUK_OPT_FORCE_BYTEORDER) | |
| 2263 #undef DUK_USE_BYTEORDER | |
| 2264 #if (DUK_OPT_FORCE_BYTEORDER == 1) | |
| 2265 #define DUK_USE_BYTEORDER 1 | |
| 2266 #elif (DUK_OPT_FORCE_BYTEORDER == 2) | |
| 2267 #define DUK_USE_BYTEORDER 2 | |
| 2268 #elif (DUK_OPT_FORCE_BYTEORDER == 3) | |
| 2269 #define DUK_USE_BYTEORDER 3 | |
| 2270 #else | |
| 2271 #error invalid DUK_OPT_FORCE_BYTEORDER value | |
| 2272 #endif | |
| 2273 #endif /* DUK_OPT_FORCE_BYTEORDER */ | |
| 2274 | |
| 2275 /* GCC and Clang provide endianness defines as built-in predefines, with | |
| 2276 * leading and trailing double underscores (e.g. __BYTE_ORDER__). See | |
| 2277 * output of "make gccpredefs" and "make clangpredefs". Clang doesn't | |
| 2278 * seem to provide __FLOAT_WORD_ORDER__; assume not mixed endian for clang. | |
| 2279 * http://gcc.gnu.org/onlinedocs/cpp/Common-Predefined-Macros.html | |
| 2280 */ | |
| 2281 #if !defined(DUK_USE_BYTEORDER) && defined(__BYTE_ORDER__) | |
| 2282 #if defined(__ORDER_LITTLE_ENDIAN__) && (__BYTE_ORDER__ == __ORDER_LITTLE_ENDIAN__) | |
| 2283 #if defined(__FLOAT_WORD_ORDER__) && defined(__ORDER_LITTLE_ENDIAN__) && (__FLOAT_WORD_ORDER__ == __ORDER_LITTLE_ENDIAN__) | |
| 2284 #define DUK_USE_BYTEORDER 1 | |
| 2285 #elif defined(__FLOAT_WORD_ORDER__) && defined(__ORDER_BIG_ENDIAN__) && (__FLOAT_WORD_ORDER__ == __ORDER_BIG_ENDIAN__) | |
| 2286 #define DUK_USE_BYTEORDER 2 | |
| 2287 #elif !defined(__FLOAT_WORD_ORDER__) | |
| 2288 /* Float word order not known, assume not a hybrid. */ | |
| 2289 #define DUK_USE_BYTEORDER 1 | |
| 2290 #else | |
| 2291 /* Byte order is little endian but cannot determine IEEE double word order. */ | |
| 2292 #endif /* float word order */ | |
| 2293 #elif defined(__ORDER_BIG_ENDIAN__) && (__BYTE_ORDER__ == __ORDER_BIG_ENDIAN__) | |
| 2294 #if defined(__FLOAT_WORD_ORDER__) && defined(__ORDER_BIG_ENDIAN__) && (__FLOAT_WORD_ORDER__ == __ORDER_BIG_ENDIAN__) | |
| 2295 #define DUK_USE_BYTEORDER 3 | |
| 2296 #elif !defined(__FLOAT_WORD_ORDER__) | |
| 2297 /* Float word order not known, assume not a hybrid. */ | |
| 2298 #define DUK_USE_BYTEORDER 3 | |
| 2299 #else | |
| 2300 /* Byte order is big endian but cannot determine IEEE double word order. */ | |
| 2301 #endif /* float word order */ | |
| 2302 #else | |
| 2303 /* Cannot determine byte order; __ORDER_PDP_ENDIAN__ is related to 32-bit | |
| 2304 * integer ordering and is not relevant. | |
| 2305 */ | |
| 2306 #endif /* integer byte order */ | |
| 2307 #endif /* !defined(DUK_USE_BYTEORDER) && defined(__BYTE_ORDER__) */ | |
| 2308 | |
| 2309 /* More or less standard endianness predefines provided by header files. | |
| 2310 * The ARM hybrid case is detected by assuming that __FLOAT_WORD_ORDER | |
| 2311 * will be big endian, see: http://lists.mysql.com/internals/443. | |
| 2312 * On some platforms some defines may be present with an empty value which | |
| 2313 * causes comparisons to fail: https://github.com/svaarala/duktape/issues/453. | |
| 2314 */ | |
| 2315 #if !defined(DUK_USE_BYTEORDER) | |
| 2316 #if defined(__BYTE_ORDER) && defined(__LITTLE_ENDIAN) && (__BYTE_ORDER == __LITTLE_ENDIAN) || \ | |
| 2317 defined(_BYTE_ORDER) && defined(_LITTLE_ENDIAN) && (_BYTE_ORDER == _LITTLE_ENDIAN) || \ | |
| 2318 defined(__LITTLE_ENDIAN__) | |
| 2319 #if defined(__FLOAT_WORD_ORDER) && defined(__LITTLE_ENDIAN) && (__FLOAT_WORD_ORDER == __LITTLE_ENDIAN) || \ | |
| 2320 defined(_FLOAT_WORD_ORDER) && defined(_LITTLE_ENDIAN) && (_FLOAT_WORD_ORDER == _LITTLE_ENDIAN) | |
| 2321 #define DUK_USE_BYTEORDER 1 | |
| 2322 #elif defined(__FLOAT_WORD_ORDER) && defined(__BIG_ENDIAN) && (__FLOAT_WORD_ORDER == __BIG_ENDIAN) || \ | |
| 2323 defined(_FLOAT_WORD_ORDER) && defined(_BIG_ENDIAN) && (_FLOAT_WORD_ORDER == _BIG_ENDIAN) | |
| 2324 #define DUK_USE_BYTEORDER 2 | |
| 2325 #elif !defined(__FLOAT_WORD_ORDER) && !defined(_FLOAT_WORD_ORDER) | |
| 2326 /* Float word order not known, assume not a hybrid. */ | |
| 2327 #define DUK_USE_BYTEORDER 1 | |
| 2328 #else | |
| 2329 /* Byte order is little endian but cannot determine IEEE double word order. */ | |
| 2330 #endif /* float word order */ | |
| 2331 #elif defined(__BYTE_ORDER) && defined(__BIG_ENDIAN) && (__BYTE_ORDER == __BIG_ENDIAN) || \ | |
| 2332 defined(_BYTE_ORDER) && defined(_BIG_ENDIAN) && (_BYTE_ORDER == _BIG_ENDIAN) || \ | |
| 2333 defined(__BIG_ENDIAN__) | |
| 2334 #if defined(__FLOAT_WORD_ORDER) && defined(__BIG_ENDIAN) && (__FLOAT_WORD_ORDER == __BIG_ENDIAN) || \ | |
| 2335 defined(_FLOAT_WORD_ORDER) && defined(_BIG_ENDIAN) && (_FLOAT_WORD_ORDER == _BIG_ENDIAN) | |
| 2336 #define DUK_USE_BYTEORDER 3 | |
| 2337 #elif !defined(__FLOAT_WORD_ORDER) && !defined(_FLOAT_WORD_ORDER) | |
| 2338 /* Float word order not known, assume not a hybrid. */ | |
| 2339 #define DUK_USE_BYTEORDER 3 | |
| 2340 #else | |
| 2341 /* Byte order is big endian but cannot determine IEEE double word order. */ | |
| 2342 #endif /* float word order */ | |
| 2343 #else | |
| 2344 /* Cannot determine byte order. */ | |
| 2345 #endif /* integer byte order */ | |
| 2346 #endif /* !defined(DUK_USE_BYTEORDER) */ | |
| 2347 | |
| 2348 /* QNX gcc cross compiler seems to define e.g. __LITTLEENDIAN__ or __BIGENDIAN__: | |
| 2349 * $ /opt/qnx650/host/linux/x86/usr/bin/i486-pc-nto-qnx6.5.0-gcc -dM -E - </dev/null | grep -ni endian | |
| 2350 * 67:#define __LITTLEENDIAN__ 1 | |
| 2351 * $ /opt/qnx650/host/linux/x86/usr/bin/mips-unknown-nto-qnx6.5.0-gcc -dM -E - </dev/null | grep -ni endian | |
| 2352 * 81:#define __BIGENDIAN__ 1 | |
| 2353 * $ /opt/qnx650/host/linux/x86/usr/bin/arm-unknown-nto-qnx6.5.0-gcc -dM -E - </dev/null | grep -ni endian | |
| 2354 * 70:#define __LITTLEENDIAN__ 1 | |
| 2355 */ | |
| 2356 #if !defined(DUK_USE_BYTEORDER) | |
| 2357 #if defined(__LITTLEENDIAN__) | |
| 2358 #define DUK_USE_BYTEORDER 1 | |
| 2359 #elif defined(__BIGENDIAN__) | |
| 2360 #define DUK_USE_BYTEORDER 3 | |
| 2361 #endif | |
| 2362 #endif | |
| 2363 | |
| 2364 /* | |
| 2365 * Alignment requirement and support for unaligned accesses | |
| 2366 * | |
| 2367 * Assume unaligned accesses are not supported unless specifically allowed | |
| 2368 * in the target platform. Some platforms may support unaligned accesses | |
| 2369 * but alignment to 4 or 8 may still be desirable. | |
| 2370 */ | |
| 2371 | |
| 2372 /* If not provided, use safe default for alignment. */ | |
| 2373 #if !defined(DUK_USE_ALIGN_BY) | |
| 2374 #define DUK_USE_ALIGN_BY 8 | |
| 2375 #endif | |
| 2376 | |
| 2377 /* User forced alignment to 4 or 8. */ | |
| 2378 #if defined(DUK_OPT_FORCE_ALIGN) | |
| 2379 #undef DUK_USE_ALIGN_BY | |
| 2380 #if (DUK_OPT_FORCE_ALIGN == 4) | |
| 2381 #define DUK_USE_ALIGN_BY 4 | |
| 2382 #elif (DUK_OPT_FORCE_ALIGN == 8) | |
| 2383 #define DUK_USE_ALIGN_BY 8 | |
| 2384 #else | |
| 2385 #error invalid DUK_OPT_FORCE_ALIGN value | |
| 2386 #endif | |
| 2387 #endif | |
| 2388 | |
| 2389 /* Compiler specific hackery needed to force struct size to match aligment, | |
| 2390 * see e.g. duk_hbuffer.h. | |
| 2391 * | |
| 2392 * http://stackoverflow.com/questions/11130109/c-struct-size-alignment | |
| 2393 * http://stackoverflow.com/questions/10951039/specifying-64-bit-alignment | |
| 2394 */ | |
| 2395 #if !(defined(DUK_USE_PACK_MSVC_PRAGMA) || defined(DUK_USE_PACK_GCC_ATTR) || \ | |
| 2396 defined(DUK_USE_PACK_CLANG_ATTR) || defined(DUK_USE_PACK_DUMMY_MEMBER)) | |
| 2397 #define DUK_USE_PACK_DUMMY_MEMBER | |
| 2398 #endif | |
| 2399 | |
| 2400 #if !defined(DUK_VA_COPY) | |
| 2401 /* We need va_copy() which is defined in C99 / C++11, so an awkward | |
| 2402 * replacement is needed for pre-C99 / pre-C++11 environments. This | |
| 2403 * will quite likely need portability hacks for some non-C99 | |
| 2404 * environments. | |
| 2405 */ | |
| 2406 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 2407 /* C99 / C++11 and above: rely on va_copy() which is required. | |
| 2408 * Omit parenthesis on macro right side on purpose to minimize differences | |
| 2409 * to direct use. | |
| 2410 */ | |
| 2411 #define DUK_VA_COPY(dest,src) va_copy(dest,src) | |
| 2412 #else | |
| 2413 /* Pre-C99: va_list type is implementation dependent. This replacement | |
| 2414 * assumes it is a plain value so that a simple assignment will work. | |
| 2415 * This is not the case on all platforms (it may be a single-array element, | |
| 2416 * for instance). | |
| 2417 */ | |
| 2418 #define DUK_VA_COPY(dest,src) do { (dest) = (src); } while (0) | |
| 2419 #endif | |
| 2420 #endif | |
| 2421 | |
| 2422 #if !defined(DUK_MACRO_STRINGIFY) | |
| 2423 /* Macro hackery to convert e.g. __LINE__ to a string without formatting, | |
| 2424 * see: http://stackoverflow.com/questions/240353/convert-a-preprocessor-token-to-a-string | |
| 2425 */ | |
| 2426 #define DUK_MACRO_STRINGIFY_HELPER(x) #x | |
| 2427 #define DUK_MACRO_STRINGIFY(x) DUK_MACRO_STRINGIFY_HELPER(x) | |
| 2428 #endif | |
| 2429 | |
| 2430 #if !defined(DUK_CAUSE_SEGFAULT) | |
| 2431 /* This is optionally used by panic handling to cause the program to segfault | |
| 2432 * (instead of e.g. abort()) on panic. Valgrind will then indicate the C | |
| 2433 * call stack leading to the panic. | |
| 2434 */ | |
| 2435 #define DUK_CAUSE_SEGFAULT() do { *((volatile duk_uint32_t *) NULL) = (duk_uint32_t) 0xdeadbeefUL; } while (0) | |
| 2436 #endif | |
| 2437 #if !defined(DUK_UNREF) | |
| 2438 /* Macro for suppressing warnings for potentially unreferenced variables. | |
| 2439 * The variables can be actually unreferenced or unreferenced in some | |
| 2440 * specific cases only; for instance, if a variable is only debug printed, | |
| 2441 * it is unreferenced when debug printing is disabled. | |
| 2442 */ | |
| 2443 #define DUK_UNREF(x) do { (void) (x); } while (0) | |
| 2444 #endif | |
| 2445 #if !defined(DUK_NORETURN) | |
| 2446 #define DUK_NORETURN(decl) decl | |
| 2447 #endif | |
| 2448 #if !defined(DUK_UNREACHABLE) | |
| 2449 /* Don't know how to declare unreachable point, so don't do it; this | |
| 2450 * may cause some spurious compilation warnings (e.g. "variable used | |
| 2451 * uninitialized"). | |
| 2452 */ | |
| 2453 #define DUK_UNREACHABLE() do { } while (0) | |
| 2454 #endif | |
| 2455 #if !defined(DUK_LOSE_CONST) | |
| 2456 /* Convert any input pointer into a "void *", losing a const qualifier. | |
| 2457 * This is not fully portable because casting through duk_uintptr_t may | |
| 2458 * not work on all architectures (e.g. those with long, segmented pointers). | |
| 2459 */ | |
| 2460 #define DUK_LOSE_CONST(src) ((void *) (duk_uintptr_t) (src)) | |
| 2461 #endif | |
| 2462 | |
| 2463 #if !defined(DUK_LIKELY) | |
| 2464 #define DUK_LIKELY(x) (x) | |
| 2465 #endif | |
| 2466 #if !defined(DUK_UNLIKELY) | |
| 2467 #define DUK_UNLIKELY(x) (x) | |
| 2468 #endif | |
| 2469 | |
| 2470 #if !defined(DUK_NOINLINE) | |
| 2471 #define DUK_NOINLINE /*nop*/ | |
| 2472 #endif | |
| 2473 #if !defined(DUK_INLINE) | |
| 2474 #define DUK_INLINE /*nop*/ | |
| 2475 #endif | |
| 2476 #if !defined(DUK_ALWAYS_INLINE) | |
| 2477 #define DUK_ALWAYS_INLINE /*nop*/ | |
| 2478 #endif | |
| 2479 | |
| 2480 #if !defined(DUK_EXTERNAL_DECL) | |
| 2481 #define DUK_EXTERNAL_DECL extern | |
| 2482 #endif | |
| 2483 #if !defined(DUK_EXTERNAL) | |
| 2484 #define DUK_EXTERNAL /*empty*/ | |
| 2485 #endif | |
| 2486 #if !defined(DUK_INTERNAL_DECL) | |
| 2487 #if defined(DUK_SINGLE_FILE) | |
| 2488 #define DUK_INTERNAL_DECL static | |
| 2489 #else | |
| 2490 #define DUK_INTERNAL_DECL extern | |
| 2491 #endif | |
| 2492 #endif | |
| 2493 #if !defined(DUK_INTERNAL) | |
| 2494 #if defined(DUK_SINGLE_FILE) | |
| 2495 #define DUK_INTERNAL static | |
| 2496 #else | |
| 2497 #define DUK_INTERNAL /*empty*/ | |
| 2498 #endif | |
| 2499 #endif | |
| 2500 #if !defined(DUK_LOCAL_DECL) | |
| 2501 #define DUK_LOCAL_DECL static | |
| 2502 #endif | |
| 2503 #if !defined(DUK_LOCAL) | |
| 2504 #define DUK_LOCAL static | |
| 2505 #endif | |
| 2506 | |
| 2507 #if !defined(DUK_FILE_MACRO) | |
| 2508 #define DUK_FILE_MACRO __FILE__ | |
| 2509 #endif | |
| 2510 #if !defined(DUK_LINE_MACRO) | |
| 2511 #define DUK_LINE_MACRO __LINE__ | |
| 2512 #endif | |
| 2513 #if !defined(DUK_FUNC_MACRO) | |
| 2514 #if defined(DUK_F_C99) || defined(DUK_F_CPP11) | |
| 2515 #define DUK_FUNC_MACRO __func__ | |
| 2516 #elif defined(__FUNCTION__) | |
| 2517 #define DUK_FUNC_MACRO __FUNCTION__ | |
| 2518 #else | |
| 2519 #define DUK_FUNC_MACRO "unknown" | |
| 2520 #endif | |
| 2521 #endif | |
| 2522 | |
| 2523 #if !defined(DUK_BSWAP32) | |
| 2524 #define DUK_BSWAP32(x) \ | |
| 2525 ((((duk_uint32_t) (x)) >> 24) | \ | |
| 2526 ((((duk_uint32_t) (x)) >> 8) & 0xff00UL) | \ | |
| 2527 ((((duk_uint32_t) (x)) << 8) & 0xff0000UL) | \ | |
| 2528 (((duk_uint32_t) (x)) << 24)) | |
| 2529 #endif | |
| 2530 #if !defined(DUK_BSWAP16) | |
| 2531 #define DUK_BSWAP16(x) \ | |
| 2532 ((duk_uint16_t) (x) >> 8) | \ | |
| 2533 ((duk_uint16_t) (x) << 8) | |
| 2534 #endif | |
| 2535 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2536 /* DUK_USE_VARIADIC_MACROS: required from compilers, so no fill-in. */ |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2537 /* DUK_USE_UNION_INITIALIZERS: required from compilers, so no fill-in. */ |
| 3 | 2538 |
| 2539 #if !(defined(DUK_USE_FLEX_C99) || defined(DUK_USE_FLEX_ZEROSIZE) || defined(DUK_USE_FLEX_ONESIZE)) | |
| 2540 #if defined(DUK_F_C99) | |
| 2541 #define DUK_USE_FLEX_C99 | |
| 2542 #else | |
| 2543 #define DUK_USE_FLEX_ZEROSIZE /* Not standard but common enough */ | |
| 2544 #endif | |
| 2545 #endif | |
| 2546 | |
| 2547 #if !(defined(DUK_USE_PACK_GCC_ATTR) || defined(DUK_USE_PACK_CLANG_ATTR) || \ | |
| 2548 defined(DUK_USE_PACK_MSVC_PRAGMA) || defined(DUK_USE_PACK_DUMMY_MEMBER)) | |
| 2549 #define DUK_USE_PACK_DUMMY_MEMBER | |
| 2550 #endif | |
| 2551 | |
| 2552 #if 0 /* not defined by default */ | |
| 2553 #undef DUK_USE_GCC_PRAGMAS | |
| 2554 #endif | |
| 2555 | |
| 2556 /* Workaround for GH-323: avoid inlining control when compiling from | |
| 2557 * multiple sources, as it causes compiler portability trouble. | |
| 2558 */ | |
| 2559 #if !defined(DUK_SINGLE_FILE) | |
| 2560 #undef DUK_NOINLINE | |
| 2561 #undef DUK_INLINE | |
| 2562 #undef DUK_ALWAYS_INLINE | |
| 2563 #define DUK_NOINLINE /*nop*/ | |
| 2564 #define DUK_INLINE /*nop*/ | |
| 2565 #define DUK_ALWAYS_INLINE /*nop*/ | |
| 2566 #endif | |
| 2567 | |
| 2568 /* | |
| 2569 * Check whether or not a packed duk_tval representation is possible. | |
| 2570 * What's basically required is that pointers are 32-bit values | |
| 2571 * (sizeof(void *) == 4). Best effort check, not always accurate. | |
| 2572 * If guess goes wrong, crashes may result; self tests also verify | |
| 2573 * the guess. | |
| 2574 */ | |
| 2575 | |
| 2576 /* Explicit marker needed; may be 'defined', 'undefined, 'or 'not provided'. */ | |
| 2577 #if !defined(DUK_F_PACKED_TVAL_PROVIDED) | |
| 2578 #undef DUK_F_PACKED_TVAL_POSSIBLE | |
| 2579 | |
| 2580 /* Strict C99 case: DUK_UINTPTR_MAX (= UINTPTR_MAX) should be very reliable */ | |
| 2581 #if !defined(DUK_F_PACKED_TVAL_POSSIBLE) && defined(DUK_UINTPTR_MAX) | |
| 2582 #if (DUK_UINTPTR_MAX <= 0xffffffffUL) | |
| 2583 #define DUK_F_PACKED_TVAL_POSSIBLE | |
| 2584 #endif | |
| 2585 #endif | |
| 2586 | |
| 2587 /* Non-C99 case, still relying on DUK_UINTPTR_MAX, as long as it is not a computed value */ | |
| 2588 #if !defined(DUK_F_PACKED_TVAL_POSSIBLE) && defined(DUK_UINTPTR_MAX) && !defined(DUK_UINTPTR_MAX_COMPUTED) | |
| 2589 #if (DUK_UINTPTR_MAX <= 0xffffffffUL) | |
| 2590 #define DUK_F_PACKED_TVAL_POSSIBLE | |
| 2591 #endif | |
| 2592 #endif | |
| 2593 | |
| 2594 /* DUK_SIZE_MAX (= SIZE_MAX) is often reliable */ | |
| 2595 #if !defined(DUK_F_PACKED_TVAL_POSSIBLE) && defined(DUK_SIZE_MAX) && !defined(DUK_SIZE_MAX_COMPUTED) | |
| 2596 #if (DUK_SIZE_MAX <= 0xffffffffUL) | |
| 2597 #define DUK_F_PACKED_TVAL_POSSIBLE | |
| 2598 #endif | |
| 2599 #endif | |
| 2600 | |
| 2601 #undef DUK_USE_PACKED_TVAL | |
| 2602 #if defined(DUK_F_PACKED_TVAL_POSSIBLE) | |
| 2603 #define DUK_USE_PACKED_TVAL | |
| 2604 #endif | |
| 2605 | |
| 2606 #undef DUK_F_PACKED_TVAL_POSSIBLE | |
| 2607 #endif /* DUK_F_PACKED_TVAL_PROVIDED */ | |
| 2608 | |
| 2609 /* Feature option forcing. */ | |
| 2610 #if defined(DUK_OPT_NO_PACKED_TVAL) | |
| 2611 #undef DUK_USE_PACKED_TVAL | |
| 2612 #elif defined(DUK_OPT_PACKED_TVAL) | |
| 2613 #undef DUK_USE_PACKED_TVAL | |
| 2614 #define DUK_USE_PACKED_TVAL | |
| 2615 #endif | |
| 2616 /* Object property allocation layout has implications for memory and code | |
| 2617 * footprint and generated code size/speed. The best layout also depends | |
| 2618 * on whether the platform has alignment requirements or benefits from | |
| 2619 * having mostly aligned accesses. | |
| 2620 */ | |
| 2621 #undef DUK_USE_HOBJECT_LAYOUT_1 | |
| 2622 #undef DUK_USE_HOBJECT_LAYOUT_2 | |
| 2623 #undef DUK_USE_HOBJECT_LAYOUT_3 | |
| 2624 #if (DUK_USE_ALIGN_BY == 1) | |
| 2625 /* On platforms without any alignment issues, layout 1 is preferable | |
| 2626 * because it compiles to slightly less code and provides direct access | |
| 2627 * to property keys. | |
| 2628 */ | |
| 2629 #define DUK_USE_HOBJECT_LAYOUT_1 | |
| 2630 #else | |
| 2631 /* On other platforms use layout 2, which requires some padding but | |
| 2632 * is a bit more natural than layout 3 in ordering the entries. Layout | |
| 2633 * 3 is currently not used. | |
| 2634 */ | |
| 2635 #define DUK_USE_HOBJECT_LAYOUT_2 | |
| 2636 #endif | |
| 2637 | |
| 2638 /* GCC/clang inaccurate math would break compliance and probably duk_tval, | |
| 2639 * so refuse to compile. Relax this if -ffast-math is tested to work. | |
| 2640 */ | |
| 2641 #if defined(__FAST_MATH__) | |
| 2642 #error __FAST_MATH__ defined, refusing to compile | |
| 2643 #endif | |
| 2644 | |
| 2645 /* | |
| 2646 * Feature option handling | |
| 2647 */ | |
| 2648 | |
| 2649 #if !defined(DUK_USE_ALIGN_BY) | |
| 2650 #if defined(DUK_OPT_FORCE_ALIGN) | |
| 2651 #define DUK_USE_ALIGN_BY DUK_OPT_FORCE_ALIGN | |
| 2652 #else | |
| 2653 #define DUK_USE_ALIGN_BY 8 | |
| 2654 #endif | |
| 2655 #endif | |
| 2656 | |
| 2657 #if defined(DUK_OPT_ASSERTIONS) | |
| 2658 #define DUK_USE_ASSERTIONS | |
| 2659 #elif defined(DUK_OPT_NO_ASSERTIONS) | |
| 2660 #undef DUK_USE_ASSERTIONS | |
| 2661 #else | |
| 2662 #undef DUK_USE_ASSERTIONS | |
| 2663 #endif | |
| 2664 | |
| 2665 #if defined(DUK_OPT_AUGMENT_ERRORS) | |
| 2666 #define DUK_USE_AUGMENT_ERROR_CREATE | |
| 2667 #elif defined(DUK_OPT_NO_AUGMENT_ERRORS) | |
| 2668 #undef DUK_USE_AUGMENT_ERROR_CREATE | |
| 2669 #else | |
| 2670 #define DUK_USE_AUGMENT_ERROR_CREATE | |
| 2671 #endif | |
| 2672 | |
| 2673 #if defined(DUK_OPT_AUGMENT_ERRORS) | |
| 2674 #define DUK_USE_AUGMENT_ERROR_THROW | |
| 2675 #elif defined(DUK_OPT_NO_AUGMENT_ERRORS) | |
| 2676 #undef DUK_USE_AUGMENT_ERROR_THROW | |
| 2677 #else | |
| 2678 #define DUK_USE_AUGMENT_ERROR_THROW | |
| 2679 #endif | |
| 2680 | |
| 2681 #if defined(DUK_OPT_BROWSER_LIKE) | |
| 2682 #define DUK_USE_BROWSER_LIKE | |
| 2683 #elif defined(DUK_OPT_NO_BROWSER_LIKE) | |
| 2684 #undef DUK_USE_BROWSER_LIKE | |
| 2685 #else | |
| 2686 #define DUK_USE_BROWSER_LIKE | |
| 2687 #endif | |
| 2688 | |
| 2689 #if defined(DUK_OPT_BUFFEROBJECT_SUPPORT) | |
| 2690 #define DUK_USE_BUFFEROBJECT_SUPPORT | |
| 2691 #elif defined(DUK_OPT_NO_BUFFEROBJECT_SUPPORT) | |
| 2692 #undef DUK_USE_BUFFEROBJECT_SUPPORT | |
| 2693 #else | |
| 2694 #define DUK_USE_BUFFEROBJECT_SUPPORT | |
| 2695 #endif | |
| 2696 | |
| 2697 #if defined(DUK_OPT_BUFLEN16) | |
| 2698 #define DUK_USE_BUFLEN16 | |
| 2699 #elif defined(DUK_OPT_NO_BUFLEN16) | |
| 2700 #undef DUK_USE_BUFLEN16 | |
| 2701 #else | |
| 2702 #undef DUK_USE_BUFLEN16 | |
| 2703 #endif | |
| 2704 | |
| 2705 #if defined(DUK_OPT_BYTECODE_DUMP_SUPPORT) | |
| 2706 #define DUK_USE_BYTECODE_DUMP_SUPPORT | |
| 2707 #elif defined(DUK_OPT_NO_BYTECODE_DUMP_SUPPORT) | |
| 2708 #undef DUK_USE_BYTECODE_DUMP_SUPPORT | |
| 2709 #else | |
| 2710 #define DUK_USE_BYTECODE_DUMP_SUPPORT | |
| 2711 #endif | |
| 2712 | |
| 2713 #if defined(DUK_OPT_COMMONJS_MODULES) | |
| 2714 #define DUK_USE_COMMONJS_MODULES | |
| 2715 #elif defined(DUK_OPT_NO_COMMONJS_MODULES) | |
| 2716 #undef DUK_USE_COMMONJS_MODULES | |
| 2717 #else | |
| 2718 #define DUK_USE_COMMONJS_MODULES | |
| 2719 #endif | |
| 2720 | |
| 2721 #if defined(DUK_OPT_CPP_EXCEPTIONS) | |
| 2722 #define DUK_USE_CPP_EXCEPTIONS | |
| 2723 #elif defined(DUK_OPT_NO_CPP_EXCEPTIONS) | |
| 2724 #undef DUK_USE_CPP_EXCEPTIONS | |
| 2725 #else | |
| 2726 #undef DUK_USE_CPP_EXCEPTIONS | |
| 2727 #endif | |
| 2728 | |
| 2729 #if defined(DUK_OPT_DATAPTR16) | |
| 2730 #define DUK_USE_DATAPTR16 | |
| 2731 #elif defined(DUK_OPT_NO_DATAPTR16) | |
| 2732 #undef DUK_USE_DATAPTR16 | |
| 2733 #else | |
| 2734 #undef DUK_USE_DATAPTR16 | |
| 2735 #endif | |
| 2736 | |
| 2737 #if defined(DUK_OPT_DATAPTR_DEC16) | |
| 2738 #define DUK_USE_DATAPTR_DEC16(udata,ptr) DUK_OPT_DATAPTR_DEC16((udata),(ptr)) | |
| 2739 #else | |
| 2740 #undef DUK_USE_DATAPTR_DEC16 | |
| 2741 #endif | |
| 2742 | |
| 2743 #if defined(DUK_OPT_DATAPTR_ENC16) | |
| 2744 #define DUK_USE_DATAPTR_ENC16(udata,ptr) DUK_OPT_DATAPTR_ENC16((udata),(ptr)) | |
| 2745 #else | |
| 2746 #undef DUK_USE_DATAPTR_ENC16 | |
| 2747 #endif | |
| 2748 | |
| 2749 #if defined(DUK_OPT_DDDPRINT) | |
| 2750 #define DUK_USE_DDDPRINT | |
| 2751 #elif defined(DUK_OPT_NO_DDDPRINT) | |
| 2752 #undef DUK_USE_DDDPRINT | |
| 2753 #else | |
| 2754 #undef DUK_USE_DDDPRINT | |
| 2755 #endif | |
| 2756 | |
| 2757 #if defined(DUK_OPT_DDPRINT) | |
| 2758 #define DUK_USE_DDPRINT | |
| 2759 #elif defined(DUK_OPT_NO_DDPRINT) | |
| 2760 #undef DUK_USE_DDPRINT | |
| 2761 #else | |
| 2762 #undef DUK_USE_DDPRINT | |
| 2763 #endif | |
| 2764 | |
| 2765 #if defined(DUK_OPT_DEBUG) | |
| 2766 #define DUK_USE_DEBUG | |
| 2767 #elif defined(DUK_OPT_NO_DEBUG) | |
| 2768 #undef DUK_USE_DEBUG | |
| 2769 #else | |
| 2770 #undef DUK_USE_DEBUG | |
| 2771 #endif | |
| 2772 | |
| 2773 #if defined(DUK_OPT_DEBUGGER_DUMPHEAP) | |
| 2774 #define DUK_USE_DEBUGGER_DUMPHEAP | |
| 2775 #elif defined(DUK_OPT_NO_DEBUGGER_DUMPHEAP) | |
| 2776 #undef DUK_USE_DEBUGGER_DUMPHEAP | |
| 2777 #else | |
| 2778 #undef DUK_USE_DEBUGGER_DUMPHEAP | |
| 2779 #endif | |
| 2780 | |
| 2781 #if defined(DUK_OPT_DEBUGGER_FWD_LOGGING) | |
| 2782 #define DUK_USE_DEBUGGER_FWD_LOGGING | |
| 2783 #elif defined(DUK_OPT_NO_DEBUGGER_FWD_LOGGING) | |
| 2784 #undef DUK_USE_DEBUGGER_FWD_LOGGING | |
| 2785 #else | |
| 2786 #undef DUK_USE_DEBUGGER_FWD_LOGGING | |
| 2787 #endif | |
| 2788 | |
| 2789 #if defined(DUK_OPT_DEBUGGER_FWD_PRINTALERT) | |
| 2790 #define DUK_USE_DEBUGGER_FWD_PRINTALERT | |
| 2791 #elif defined(DUK_OPT_NO_DEBUGGER_FWD_PRINTALERT) | |
| 2792 #undef DUK_USE_DEBUGGER_FWD_PRINTALERT | |
| 2793 #else | |
| 2794 #undef DUK_USE_DEBUGGER_FWD_PRINTALERT | |
| 2795 #endif | |
| 2796 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2797 #if defined(DUK_OPT_DEBUGGER_INSPECT) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2798 #define DUK_USE_DEBUGGER_INSPECT |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2799 #elif defined(DUK_OPT_NO_DEBUGGER_INSPECT) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2800 #undef DUK_USE_DEBUGGER_INSPECT |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2801 #else |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2802 #undef DUK_USE_DEBUGGER_INSPECT |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2803 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2804 |
| 3 | 2805 #if defined(DUK_OPT_DEBUGGER_PAUSE_UNCAUGHT) |
| 2806 #define DUK_USE_DEBUGGER_PAUSE_UNCAUGHT | |
| 2807 #elif defined(DUK_OPT_NO_DEBUGGER_PAUSE_UNCAUGHT) | |
| 2808 #undef DUK_USE_DEBUGGER_PAUSE_UNCAUGHT | |
| 2809 #else | |
| 2810 #undef DUK_USE_DEBUGGER_PAUSE_UNCAUGHT | |
| 2811 #endif | |
| 2812 | |
| 2813 #if defined(DUK_OPT_DEBUGGER_SUPPORT) | |
| 2814 #define DUK_USE_DEBUGGER_SUPPORT | |
| 2815 #elif defined(DUK_OPT_NO_DEBUGGER_SUPPORT) | |
| 2816 #undef DUK_USE_DEBUGGER_SUPPORT | |
| 2817 #else | |
| 2818 #undef DUK_USE_DEBUGGER_SUPPORT | |
| 2819 #endif | |
| 2820 | |
| 2821 #if defined(DUK_OPT_DEBUGGER_THROW_NOTIFY) | |
| 2822 #define DUK_USE_DEBUGGER_THROW_NOTIFY | |
| 2823 #elif defined(DUK_OPT_NO_DEBUGGER_THROW_NOTIFY) | |
| 2824 #undef DUK_USE_DEBUGGER_THROW_NOTIFY | |
| 2825 #else | |
| 2826 #define DUK_USE_DEBUGGER_THROW_NOTIFY | |
| 2827 #endif | |
| 2828 | |
| 2829 #if defined(DUK_OPT_DEBUGGER_TRANSPORT_TORTURE) | |
| 2830 #define DUK_USE_DEBUGGER_TRANSPORT_TORTURE | |
| 2831 #elif defined(DUK_OPT_NO_DEBUGGER_TRANSPORT_TORTURE) | |
| 2832 #undef DUK_USE_DEBUGGER_TRANSPORT_TORTURE | |
| 2833 #else | |
| 2834 #undef DUK_USE_DEBUGGER_TRANSPORT_TORTURE | |
| 2835 #endif | |
| 2836 | |
| 2837 #if defined(DUK_OPT_DEBUG_BUFSIZE) | |
| 2838 #define DUK_USE_DEBUG_BUFSIZE DUK_OPT_DEBUG_BUFSIZE | |
| 2839 #else | |
| 2840 #define DUK_USE_DEBUG_BUFSIZE 65536L | |
| 2841 #endif | |
| 2842 | |
| 2843 #if defined(DUK_OPT_REFERENCE_COUNTING) | |
| 2844 #define DUK_USE_DOUBLE_LINKED_HEAP | |
| 2845 #elif defined(DUK_OPT_NO_REFERENCE_COUNTING) | |
| 2846 #undef DUK_USE_DOUBLE_LINKED_HEAP | |
| 2847 #else | |
| 2848 #define DUK_USE_DOUBLE_LINKED_HEAP | |
| 2849 #endif | |
| 2850 | |
| 2851 #if defined(DUK_OPT_DPRINT) | |
| 2852 #define DUK_USE_DPRINT | |
| 2853 #elif defined(DUK_OPT_NO_DPRINT) | |
| 2854 #undef DUK_USE_DPRINT | |
| 2855 #else | |
| 2856 #undef DUK_USE_DPRINT | |
| 2857 #endif | |
| 2858 | |
| 2859 #if defined(DUK_OPT_DPRINT_COLORS) | |
| 2860 #define DUK_USE_DPRINT_COLORS | |
| 2861 #elif defined(DUK_OPT_NO_DPRINT_COLORS) | |
| 2862 #undef DUK_USE_DPRINT_COLORS | |
| 2863 #else | |
| 2864 #undef DUK_USE_DPRINT_COLORS | |
| 2865 #endif | |
| 2866 | |
| 2867 #if defined(DUK_OPT_DPRINT_RDTSC) | |
| 2868 #define DUK_USE_DPRINT_RDTSC | |
| 2869 #elif defined(DUK_OPT_NO_DPRINT_RDTSC) | |
| 2870 #undef DUK_USE_DPRINT_RDTSC | |
| 2871 #else | |
| 2872 #undef DUK_USE_DPRINT_RDTSC | |
| 2873 #endif | |
| 2874 | |
| 2875 #if defined(DUK_OPT_AUGMENT_ERRORS) | |
| 2876 #define DUK_USE_ERRCREATE | |
| 2877 #elif defined(DUK_OPT_NO_AUGMENT_ERRORS) | |
| 2878 #undef DUK_USE_ERRCREATE | |
| 2879 #else | |
| 2880 #define DUK_USE_ERRCREATE | |
| 2881 #endif | |
| 2882 | |
| 2883 #if defined(DUK_OPT_AUGMENT_ERRORS) | |
| 2884 #define DUK_USE_ERRTHROW | |
| 2885 #elif defined(DUK_OPT_NO_AUGMENT_ERRORS) | |
| 2886 #undef DUK_USE_ERRTHROW | |
| 2887 #else | |
| 2888 #define DUK_USE_ERRTHROW | |
| 2889 #endif | |
| 2890 | |
| 2891 #if defined(DUK_OPT_ES6_OBJECT_PROTO_PROPERTY) | |
| 2892 #define DUK_USE_ES6_OBJECT_PROTO_PROPERTY | |
| 2893 #elif defined(DUK_OPT_NO_ES6_OBJECT_PROTO_PROPERTY) | |
| 2894 #undef DUK_USE_ES6_OBJECT_PROTO_PROPERTY | |
| 2895 #else | |
| 2896 #define DUK_USE_ES6_OBJECT_PROTO_PROPERTY | |
| 2897 #endif | |
| 2898 | |
| 2899 #if defined(DUK_OPT_ES6_OBJECT_SETPROTOTYPEOF) | |
| 2900 #define DUK_USE_ES6_OBJECT_SETPROTOTYPEOF | |
| 2901 #elif defined(DUK_OPT_NO_ES6_OBJECT_SETPROTOTYPEOF) | |
| 2902 #undef DUK_USE_ES6_OBJECT_SETPROTOTYPEOF | |
| 2903 #else | |
| 2904 #define DUK_USE_ES6_OBJECT_SETPROTOTYPEOF | |
| 2905 #endif | |
| 2906 | |
| 2907 #if defined(DUK_OPT_ES6_PROXY) | |
| 2908 #define DUK_USE_ES6_PROXY | |
| 2909 #elif defined(DUK_OPT_NO_ES6_PROXY) | |
| 2910 #undef DUK_USE_ES6_PROXY | |
| 2911 #else | |
| 2912 #define DUK_USE_ES6_PROXY | |
| 2913 #endif | |
| 2914 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2915 #if defined(DUK_OPT_ES6_REGEXP_BRACES) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2916 #define DUK_USE_ES6_REGEXP_BRACES |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2917 #elif defined(DUK_OPT_NO_ES6_REGEXP_BRACES) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2918 #undef DUK_USE_ES6_REGEXP_BRACES |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2919 #else |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2920 #define DUK_USE_ES6_REGEXP_BRACES |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2921 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
2922 |
| 3 | 2923 #undef DUK_USE_EXEC_INDIRECT_BOUND_CHECK |
| 2924 #if defined(DUK_OPT_DEBUG) || defined(DUK_OPT_ASSERTIONS) | |
| 2925 /* Enabled with debug/assertions just so that any issues can be caught. */ | |
| 2926 #define DUK_USE_EXEC_INDIRECT_BOUND_CHECK | |
| 2927 #endif | |
| 2928 | |
| 2929 #undef DUK_USE_EXEC_TIMEOUT_CHECK | |
| 2930 #if defined(DUK_OPT_EXEC_TIMEOUT_CHECK) | |
| 2931 #define DUK_USE_EXEC_TIMEOUT_CHECK(udata) DUK_OPT_EXEC_TIMEOUT_CHECK((udata)) | |
| 2932 #endif | |
| 2933 | |
| 2934 #undef DUK_USE_EXTSTR_FREE | |
| 2935 #if defined(DUK_OPT_EXTERNAL_STRINGS) && defined(DUK_OPT_EXTSTR_FREE) | |
| 2936 #define DUK_USE_EXTSTR_FREE(udata,ptr) DUK_OPT_EXTSTR_FREE((udata), (ptr)) | |
| 2937 #endif | |
| 2938 | |
| 2939 #undef DUK_USE_EXTSTR_INTERN_CHECK | |
| 2940 #if defined(DUK_OPT_EXTERNAL_STRINGS) && defined(DUK_OPT_EXTSTR_INTERN_CHECK) | |
| 2941 #define DUK_USE_EXTSTR_INTERN_CHECK(udata,ptr,len) DUK_OPT_EXTSTR_INTERN_CHECK((udata), (ptr), (len)) | |
| 2942 #endif | |
| 2943 | |
| 2944 /* Support for 48-bit signed integer duk_tval with transparent semantics. */ | |
| 2945 #undef DUK_USE_FASTINT | |
| 2946 #if defined(DUK_OPT_FASTINT) | |
| 2947 #if !defined(DUK_F_HAVE_64BIT) | |
| 2948 #error DUK_OPT_FASTINT requires 64-bit integer type support at the moment | |
| 2949 #endif | |
| 2950 #define DUK_USE_FASTINT | |
| 2951 #endif | |
| 2952 | |
| 2953 #if defined(DUK_OPT_FILE_IO) | |
| 2954 #define DUK_USE_FILE_IO | |
| 2955 #elif defined(DUK_OPT_NO_FILE_IO) | |
| 2956 #undef DUK_USE_FILE_IO | |
| 2957 #else | |
| 2958 #define DUK_USE_FILE_IO | |
| 2959 #endif | |
| 2960 | |
| 2961 #if defined(DUK_OPT_FUNCPTR16) | |
| 2962 #define DUK_USE_FUNCPTR16 | |
| 2963 #elif defined(DUK_OPT_NO_FUNCPTR16) | |
| 2964 #undef DUK_USE_FUNCPTR16 | |
| 2965 #else | |
| 2966 #undef DUK_USE_FUNCPTR16 | |
| 2967 #endif | |
| 2968 | |
| 2969 #if defined(DUK_OPT_FUNCPTR_DEC16) | |
| 2970 #define DUK_USE_FUNCPTR_DEC16(udata,ptr) DUK_OPT_FUNCPTR_DEC16((udata),(ptr)) | |
| 2971 #else | |
| 2972 #undef DUK_USE_FUNCPTR_DEC16 | |
| 2973 #endif | |
| 2974 | |
| 2975 #if defined(DUK_OPT_FUNCPTR_ENC16) | |
| 2976 #define DUK_USE_FUNCPTR_ENC16(udata,ptr) DUK_OPT_FUNCPTR_ENC16((udata),(ptr)) | |
| 2977 #else | |
| 2978 #undef DUK_USE_FUNCPTR_ENC16 | |
| 2979 #endif | |
| 2980 | |
| 2981 #if defined(DUK_OPT_GC_TORTURE) | |
| 2982 #define DUK_USE_GC_TORTURE | |
| 2983 #elif defined(DUK_OPT_NO_GC_TORTURE) | |
| 2984 #undef DUK_USE_GC_TORTURE | |
| 2985 #else | |
| 2986 #undef DUK_USE_GC_TORTURE | |
| 2987 #endif | |
| 2988 | |
| 2989 #if defined(DUK_OPT_HEAPPTR16) | |
| 2990 #define DUK_USE_HEAPPTR16 | |
| 2991 #elif defined(DUK_OPT_NO_HEAPPTR16) | |
| 2992 #undef DUK_USE_HEAPPTR16 | |
| 2993 #else | |
| 2994 #undef DUK_USE_HEAPPTR16 | |
| 2995 #endif | |
| 2996 | |
| 2997 #if defined(DUK_OPT_HEAPPTR_DEC16) | |
| 2998 #define DUK_USE_HEAPPTR_DEC16(udata,ptr) DUK_OPT_HEAPPTR_DEC16((udata),(ptr)) | |
| 2999 #else | |
| 3000 #undef DUK_USE_HEAPPTR_DEC16 | |
| 3001 #endif | |
| 3002 | |
| 3003 #if defined(DUK_OPT_HEAPPTR_ENC16) | |
| 3004 #define DUK_USE_HEAPPTR_ENC16(udata,ptr) DUK_OPT_HEAPPTR_ENC16((udata),(ptr)) | |
| 3005 #else | |
| 3006 #undef DUK_USE_HEAPPTR_ENC16 | |
| 3007 #endif | |
| 3008 | |
| 3009 /* For now, hash part is dropped if and only if 16-bit object fields are used. */ | |
| 3010 #define DUK_USE_HOBJECT_HASH_PART | |
| 3011 #if defined(DUK_OPT_OBJSIZES16) | |
| 3012 #undef DUK_USE_HOBJECT_HASH_PART | |
| 3013 #endif | |
| 3014 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3015 #if defined(DUK_OPT_HSTRING_CLEN) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3016 #define DUK_USE_HSTRING_CLEN |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3017 #elif defined(DUK_OPT_NO_HSTRING_CLEN) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3018 #undef DUK_USE_HSTRING_CLEN |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3019 #else |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3020 #define DUK_USE_HSTRING_CLEN |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3021 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3022 |
| 3 | 3023 #if defined(DUK_OPT_EXTERNAL_STRINGS) |
| 3024 #define DUK_USE_HSTRING_EXTDATA | |
| 3025 #elif defined(DUK_OPT_NO_EXTERNAL_STRINGS) | |
| 3026 #undef DUK_USE_HSTRING_EXTDATA | |
| 3027 #else | |
| 3028 #undef DUK_USE_HSTRING_EXTDATA | |
| 3029 #endif | |
| 3030 | |
| 3031 #if defined(DUK_OPT_INTERRUPT_COUNTER) | |
| 3032 #define DUK_USE_INTERRUPT_COUNTER | |
| 3033 #elif defined(DUK_OPT_NO_INTERRUPT_COUNTER) | |
| 3034 #undef DUK_USE_INTERRUPT_COUNTER | |
| 3035 #else | |
| 3036 #undef DUK_USE_INTERRUPT_COUNTER | |
| 3037 #endif | |
| 3038 | |
| 3039 #if defined(DUK_OPT_JC) | |
| 3040 #define DUK_USE_JC | |
| 3041 #elif defined(DUK_OPT_NO_JC) | |
| 3042 #undef DUK_USE_JC | |
| 3043 #else | |
| 3044 #define DUK_USE_JC | |
| 3045 #endif | |
| 3046 | |
| 3047 #if defined(DUK_OPT_JSON_STRINGIFY_FASTPATH) | |
| 3048 #define DUK_USE_JSON_STRINGIFY_FASTPATH | |
| 3049 #elif defined(DUK_OPT_NO_JSON_STRINGIFY_FASTPATH) | |
| 3050 #undef DUK_USE_JSON_STRINGIFY_FASTPATH | |
| 3051 #else | |
| 3052 #undef DUK_USE_JSON_STRINGIFY_FASTPATH | |
| 3053 #endif | |
| 3054 | |
| 3055 #if defined(DUK_OPT_JX) | |
| 3056 #define DUK_USE_JX | |
| 3057 #elif defined(DUK_OPT_NO_JX) | |
| 3058 #undef DUK_USE_JX | |
| 3059 #else | |
| 3060 #define DUK_USE_JX | |
| 3061 #endif | |
| 3062 | |
| 3063 #if defined(DUK_OPT_LIGHTFUNC_BUILTINS) | |
| 3064 #define DUK_USE_LIGHTFUNC_BUILTINS | |
| 3065 #elif defined(DUK_OPT_NO_LIGHTFUNC_BUILTINS) | |
| 3066 #undef DUK_USE_LIGHTFUNC_BUILTINS | |
| 3067 #else | |
| 3068 #undef DUK_USE_LIGHTFUNC_BUILTINS | |
| 3069 #endif | |
| 3070 | |
| 3071 #if defined(DUK_OPT_MARK_AND_SWEEP) | |
| 3072 #define DUK_USE_MARK_AND_SWEEP | |
| 3073 #elif defined(DUK_OPT_NO_MARK_AND_SWEEP) | |
| 3074 #undef DUK_USE_MARK_AND_SWEEP | |
| 3075 #else | |
| 3076 #define DUK_USE_MARK_AND_SWEEP | |
| 3077 #endif | |
| 3078 | |
| 3079 #if defined(DUK_OPT_MS_STRINGTABLE_RESIZE) | |
| 3080 #define DUK_USE_MS_STRINGTABLE_RESIZE | |
| 3081 #elif defined(DUK_OPT_NO_MS_STRINGTABLE_RESIZE) | |
| 3082 #undef DUK_USE_MS_STRINGTABLE_RESIZE | |
| 3083 #else | |
| 3084 #define DUK_USE_MS_STRINGTABLE_RESIZE | |
| 3085 #endif | |
| 3086 | |
| 3087 #if defined(DUK_OPT_NONSTD_ARRAY_CONCAT_TRAILER) | |
| 3088 #define DUK_USE_NONSTD_ARRAY_CONCAT_TRAILER | |
| 3089 #elif defined(DUK_OPT_NO_NONSTD_ARRAY_CONCAT_TRAILER) | |
| 3090 #undef DUK_USE_NONSTD_ARRAY_CONCAT_TRAILER | |
| 3091 #else | |
| 3092 #define DUK_USE_NONSTD_ARRAY_CONCAT_TRAILER | |
| 3093 #endif | |
| 3094 | |
| 3095 #if defined(DUK_OPT_NONSTD_ARRAY_MAP_TRAILER) | |
| 3096 #define DUK_USE_NONSTD_ARRAY_MAP_TRAILER | |
| 3097 #elif defined(DUK_OPT_NO_NONSTD_ARRAY_MAP_TRAILER) | |
| 3098 #undef DUK_USE_NONSTD_ARRAY_MAP_TRAILER | |
| 3099 #else | |
| 3100 #define DUK_USE_NONSTD_ARRAY_MAP_TRAILER | |
| 3101 #endif | |
| 3102 | |
| 3103 #if defined(DUK_OPT_NONSTD_ARRAY_SPLICE_DELCOUNT) | |
| 3104 #define DUK_USE_NONSTD_ARRAY_SPLICE_DELCOUNT | |
| 3105 #elif defined(DUK_OPT_NO_NONSTD_ARRAY_SPLICE_DELCOUNT) | |
| 3106 #undef DUK_USE_NONSTD_ARRAY_SPLICE_DELCOUNT | |
| 3107 #else | |
| 3108 #define DUK_USE_NONSTD_ARRAY_SPLICE_DELCOUNT | |
| 3109 #endif | |
| 3110 | |
| 3111 #if defined(DUK_OPT_NONSTD_FUNC_CALLER_PROPERTY) | |
| 3112 #define DUK_USE_NONSTD_FUNC_CALLER_PROPERTY | |
| 3113 #elif defined(DUK_OPT_NO_NONSTD_FUNC_CALLER_PROPERTY) | |
| 3114 #undef DUK_USE_NONSTD_FUNC_CALLER_PROPERTY | |
| 3115 #else | |
| 3116 #undef DUK_USE_NONSTD_FUNC_CALLER_PROPERTY | |
| 3117 #endif | |
| 3118 | |
| 3119 #if defined(DUK_OPT_NONSTD_FUNC_SOURCE_PROPERTY) | |
| 3120 #define DUK_USE_NONSTD_FUNC_SOURCE_PROPERTY | |
| 3121 #elif defined(DUK_OPT_NO_NONSTD_FUNC_SOURCE_PROPERTY) | |
| 3122 #undef DUK_USE_NONSTD_FUNC_SOURCE_PROPERTY | |
| 3123 #else | |
| 3124 #undef DUK_USE_NONSTD_FUNC_SOURCE_PROPERTY | |
| 3125 #endif | |
| 3126 | |
| 3127 #if defined(DUK_OPT_NONSTD_FUNC_STMT) | |
| 3128 #define DUK_USE_NONSTD_FUNC_STMT | |
| 3129 #elif defined(DUK_OPT_NO_NONSTD_FUNC_STMT) | |
| 3130 #undef DUK_USE_NONSTD_FUNC_STMT | |
| 3131 #else | |
| 3132 #define DUK_USE_NONSTD_FUNC_STMT | |
| 3133 #endif | |
| 3134 | |
| 3135 #if defined(DUK_OPT_NONSTD_ACCESSOR_KEY_ARGUMENT) | |
| 3136 #define DUK_USE_NONSTD_GETTER_KEY_ARGUMENT | |
| 3137 #elif defined(DUK_OPT_NO_NONSTD_ACCESSOR_KEY_ARGUMENT) | |
| 3138 #undef DUK_USE_NONSTD_GETTER_KEY_ARGUMENT | |
| 3139 #else | |
| 3140 #define DUK_USE_NONSTD_GETTER_KEY_ARGUMENT | |
| 3141 #endif | |
| 3142 | |
| 3143 #if defined(DUK_OPT_NONSTD_JSON_ESC_U2028_U2029) | |
| 3144 #define DUK_USE_NONSTD_JSON_ESC_U2028_U2029 | |
| 3145 #elif defined(DUK_OPT_NO_NONSTD_JSON_ESC_U2028_U2029) | |
| 3146 #undef DUK_USE_NONSTD_JSON_ESC_U2028_U2029 | |
| 3147 #else | |
| 3148 #define DUK_USE_NONSTD_JSON_ESC_U2028_U2029 | |
| 3149 #endif | |
| 3150 | |
| 3151 #if defined(DUK_OPT_NONSTD_REGEXP_DOLLAR_ESCAPE) | |
| 3152 #define DUK_USE_NONSTD_REGEXP_DOLLAR_ESCAPE | |
| 3153 #elif defined(DUK_OPT_NO_NONSTD_REGEXP_DOLLAR_ESCAPE) | |
| 3154 #undef DUK_USE_NONSTD_REGEXP_DOLLAR_ESCAPE | |
| 3155 #else | |
| 3156 #define DUK_USE_NONSTD_REGEXP_DOLLAR_ESCAPE | |
| 3157 #endif | |
| 3158 | |
| 3159 #if defined(DUK_OPT_NONSTD_ACCESSOR_KEY_ARGUMENT) | |
| 3160 #define DUK_USE_NONSTD_SETTER_KEY_ARGUMENT | |
| 3161 #elif defined(DUK_OPT_NO_NONSTD_ACCESSOR_KEY_ARGUMENT) | |
| 3162 #undef DUK_USE_NONSTD_SETTER_KEY_ARGUMENT | |
| 3163 #else | |
| 3164 #define DUK_USE_NONSTD_SETTER_KEY_ARGUMENT | |
| 3165 #endif | |
| 3166 | |
| 3167 #if defined(DUK_OPT_NONSTD_STRING_FROMCHARCODE_32BIT) | |
| 3168 #define DUK_USE_NONSTD_STRING_FROMCHARCODE_32BIT | |
| 3169 #elif defined(DUK_OPT_NO_NONSTD_STRING_FROMCHARCODE_32BIT) | |
| 3170 #undef DUK_USE_NONSTD_STRING_FROMCHARCODE_32BIT | |
| 3171 #else | |
| 3172 #define DUK_USE_NONSTD_STRING_FROMCHARCODE_32BIT | |
| 3173 #endif | |
| 3174 | |
| 3175 #if defined(DUK_OPT_OBJSIZES16) | |
| 3176 #define DUK_USE_OBJSIZES16 | |
| 3177 #elif defined(DUK_OPT_NO_OBJSIZES16) | |
| 3178 #undef DUK_USE_OBJSIZES16 | |
| 3179 #else | |
| 3180 #undef DUK_USE_OBJSIZES16 | |
| 3181 #endif | |
| 3182 | |
| 3183 #if defined(DUK_OPT_OCTAL_SUPPORT) | |
| 3184 #define DUK_USE_OCTAL_SUPPORT | |
| 3185 #elif defined(DUK_OPT_NO_OCTAL_SUPPORT) | |
| 3186 #undef DUK_USE_OCTAL_SUPPORT | |
| 3187 #else | |
| 3188 #define DUK_USE_OCTAL_SUPPORT | |
| 3189 #endif | |
| 3190 | |
| 3191 #if defined(DUK_OPT_PACKED_TVAL) | |
| 3192 #define DUK_USE_PACKED_TVAL | |
| 3193 #elif defined(DUK_OPT_NO_PACKED_TVAL) | |
| 3194 #undef DUK_USE_PACKED_TVAL | |
| 3195 #else | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3196 /* Already provided above */ |
| 3 | 3197 #endif |
| 3198 | |
| 3199 #undef DUK_USE_PANIC_ABORT | |
| 3200 #if !defined(DUK_OPT_SEGFAULT_ON_PANIC) | |
| 3201 #define DUK_USE_PANIC_ABORT | |
| 3202 #endif | |
| 3203 | |
| 3204 #undef DUK_USE_PANIC_HANDLER | |
| 3205 #if defined(DUK_OPT_PANIC_HANDLER) | |
| 3206 #define DUK_USE_PANIC_HANDLER(code,msg) DUK_OPT_PANIC_HANDLER((code),(msg)) | |
| 3207 #endif | |
| 3208 | |
| 3209 #undef DUK_USE_PANIC_SEGFAULT | |
| 3210 #if defined(DUK_OPT_SEGFAULT_ON_PANIC) | |
| 3211 #define DUK_USE_PANIC_SEGFAULT | |
| 3212 #endif | |
| 3213 | |
| 3214 #if defined(DUK_OPT_PARANOID_ERRORS) | |
| 3215 #define DUK_USE_PARANOID_ERRORS | |
| 3216 #elif defined(DUK_OPT_NO_PARANOID_ERRORS) | |
| 3217 #undef DUK_USE_PARANOID_ERRORS | |
| 3218 #else | |
| 3219 #undef DUK_USE_PARANOID_ERRORS | |
| 3220 #endif | |
| 3221 | |
| 3222 #if defined(DUK_OPT_PC2LINE) | |
| 3223 #define DUK_USE_PC2LINE | |
| 3224 #elif defined(DUK_OPT_NO_PC2LINE) | |
| 3225 #undef DUK_USE_PC2LINE | |
| 3226 #else | |
| 3227 #define DUK_USE_PC2LINE | |
| 3228 #endif | |
| 3229 | |
| 3230 #if defined(DUK_OPT_REFCOUNT16) | |
| 3231 #define DUK_USE_REFCOUNT16 | |
| 3232 #elif defined(DUK_OPT_NO_REFCOUNT16) | |
| 3233 #undef DUK_USE_REFCOUNT16 | |
| 3234 #else | |
| 3235 #undef DUK_USE_REFCOUNT16 | |
| 3236 #endif | |
| 3237 | |
| 3238 #if defined(DUK_OPT_REFERENCE_COUNTING) | |
| 3239 #define DUK_USE_REFERENCE_COUNTING | |
| 3240 #elif defined(DUK_OPT_NO_REFERENCE_COUNTING) | |
| 3241 #undef DUK_USE_REFERENCE_COUNTING | |
| 3242 #else | |
| 3243 #define DUK_USE_REFERENCE_COUNTING | |
| 3244 #endif | |
| 3245 | |
| 3246 #if defined(DUK_OPT_REGEXP_CANON_WORKAROUND) | |
| 3247 #define DUK_USE_REGEXP_CANON_WORKAROUND | |
| 3248 #elif defined(DUK_OPT_NO_REGEXP_CANON_WORKAROUND) | |
| 3249 #undef DUK_USE_REGEXP_CANON_WORKAROUND | |
| 3250 #else | |
| 3251 #undef DUK_USE_REGEXP_CANON_WORKAROUND | |
| 3252 #endif | |
| 3253 | |
| 3254 #if defined(DUK_OPT_REGEXP_SUPPORT) | |
| 3255 #define DUK_USE_REGEXP_SUPPORT | |
| 3256 #elif defined(DUK_OPT_NO_REGEXP_SUPPORT) | |
| 3257 #undef DUK_USE_REGEXP_SUPPORT | |
| 3258 #else | |
| 3259 #define DUK_USE_REGEXP_SUPPORT | |
| 3260 #endif | |
| 3261 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3262 #if defined(DUK_OPT_ROM_GLOBAL_CLONE) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3263 #define DUK_USE_ROM_GLOBAL_CLONE |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3264 #elif defined(DUK_OPT_NO_ROM_GLOBAL_CLONE) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3265 #undef DUK_USE_ROM_GLOBAL_CLONE |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3266 #else |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3267 #undef DUK_USE_ROM_GLOBAL_CLONE |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3268 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3269 |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3270 #if defined(DUK_OPT_ROM_GLOBAL_INHERIT) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3271 #define DUK_USE_ROM_GLOBAL_INHERIT |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3272 #elif defined(DUK_OPT_NO_ROM_GLOBAL_INHERIT) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3273 #undef DUK_USE_ROM_GLOBAL_INHERIT |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3274 #else |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3275 #undef DUK_USE_ROM_GLOBAL_INHERIT |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3276 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3277 |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3278 #if defined(DUK_OPT_ROM_OBJECTS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3279 #define DUK_USE_ROM_OBJECTS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3280 #elif defined(DUK_OPT_NO_ROM_OBJECTS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3281 #undef DUK_USE_ROM_OBJECTS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3282 #else |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3283 #undef DUK_USE_ROM_OBJECTS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3284 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3285 |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3286 #if defined(DUK_OPT_ROM_STRINGS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3287 #define DUK_USE_ROM_STRINGS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3288 #elif defined(DUK_OPT_NO_ROM_STRINGS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3289 #undef DUK_USE_ROM_STRINGS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3290 #else |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3291 #undef DUK_USE_ROM_STRINGS |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3292 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3293 |
| 3 | 3294 #if defined(DUK_OPT_SECTION_B) |
| 3295 #define DUK_USE_SECTION_B | |
| 3296 #elif defined(DUK_OPT_NO_SECTION_B) | |
| 3297 #undef DUK_USE_SECTION_B | |
| 3298 #else | |
| 3299 #define DUK_USE_SECTION_B | |
| 3300 #endif | |
| 3301 | |
| 3302 #if defined(DUK_OPT_SELF_TESTS) | |
| 3303 #define DUK_USE_SELF_TESTS | |
| 3304 #elif defined(DUK_OPT_NO_SELF_TESTS) | |
| 3305 #undef DUK_USE_SELF_TESTS | |
| 3306 #else | |
| 3307 #undef DUK_USE_SELF_TESTS | |
| 3308 #endif | |
| 3309 | |
| 3310 #if defined(DUK_OPT_SHUFFLE_TORTURE) | |
| 3311 #define DUK_USE_SHUFFLE_TORTURE | |
| 3312 #elif defined(DUK_OPT_NO_SHUFFLE_TORTURE) | |
| 3313 #undef DUK_USE_SHUFFLE_TORTURE | |
| 3314 #else | |
| 3315 #undef DUK_USE_SHUFFLE_TORTURE | |
| 3316 #endif | |
| 3317 | |
| 3318 #if defined(DUK_OPT_SOURCE_NONBMP) | |
| 3319 #define DUK_USE_SOURCE_NONBMP | |
| 3320 #elif defined(DUK_OPT_NO_SOURCE_NONBMP) | |
| 3321 #undef DUK_USE_SOURCE_NONBMP | |
| 3322 #else | |
| 3323 #define DUK_USE_SOURCE_NONBMP | |
| 3324 #endif | |
| 3325 | |
| 3326 #if defined(DUK_OPT_STRHASH16) | |
| 3327 #define DUK_USE_STRHASH16 | |
| 3328 #elif defined(DUK_OPT_NO_STRHASH16) | |
| 3329 #undef DUK_USE_STRHASH16 | |
| 3330 #else | |
| 3331 #undef DUK_USE_STRHASH16 | |
| 3332 #endif | |
| 3333 | |
| 3334 #if defined(DUK_OPT_STRICT_DECL) | |
| 3335 #define DUK_USE_STRICT_DECL | |
| 3336 #elif defined(DUK_OPT_NO_STRICT_DECL) | |
| 3337 #undef DUK_USE_STRICT_DECL | |
| 3338 #else | |
| 3339 #define DUK_USE_STRICT_DECL | |
| 3340 #endif | |
| 3341 | |
| 3342 #if defined(DUK_OPT_STRICT_UTF8_SOURCE) | |
| 3343 #define DUK_USE_STRICT_UTF8_SOURCE | |
| 3344 #elif defined(DUK_OPT_NO_STRICT_UTF8_SOURCE) | |
| 3345 #undef DUK_USE_STRICT_UTF8_SOURCE | |
| 3346 #else | |
| 3347 #undef DUK_USE_STRICT_UTF8_SOURCE | |
| 3348 #endif | |
| 3349 | |
| 3350 #if defined(DUK_OPT_STRLEN16) | |
| 3351 #define DUK_USE_STRLEN16 | |
| 3352 #elif defined(DUK_OPT_NO_STRLEN16) | |
| 3353 #undef DUK_USE_STRLEN16 | |
| 3354 #else | |
| 3355 #undef DUK_USE_STRLEN16 | |
| 3356 #endif | |
| 3357 | |
| 3358 #undef DUK_USE_STRTAB_CHAIN | |
| 3359 #if defined(DUK_OPT_STRTAB_CHAIN) && defined(DUK_OPT_STRTAB_CHAIN_SIZE) | |
| 3360 #define DUK_USE_STRTAB_CHAIN | |
| 3361 #endif | |
| 3362 | |
| 3363 #undef DUK_USE_STRTAB_CHAIN_SIZE | |
| 3364 #if defined(DUK_OPT_STRTAB_CHAIN) && defined(DUK_OPT_STRTAB_CHAIN_SIZE) | |
| 3365 /* Low memory algorithm: separate chaining using arrays, fixed size hash */ | |
| 3366 #define DUK_USE_STRTAB_CHAIN_SIZE DUK_OPT_STRTAB_CHAIN_SIZE | |
| 3367 #endif | |
| 3368 | |
| 3369 #undef DUK_USE_STRTAB_PROBE | |
| 3370 #if !(defined(DUK_OPT_STRTAB_CHAIN) && defined(DUK_OPT_STRTAB_CHAIN_SIZE)) | |
| 3371 #define DUK_USE_STRTAB_PROBE | |
| 3372 #endif | |
| 3373 | |
| 3374 #if defined(DUK_OPT_NONSTD_FUNC_CALLER_PROPERTY) | |
| 3375 #undef DUK_USE_TAILCALL | |
| 3376 #else | |
| 3377 #define DUK_USE_TAILCALL | |
| 3378 #endif | |
| 3379 | |
| 3380 #if defined(DUK_OPT_TARGET_INFO) | |
| 3381 #define DUK_USE_TARGET_INFO DUK_OPT_TARGET_INFO | |
| 3382 #else | |
| 3383 #define DUK_USE_TARGET_INFO "unknown" | |
| 3384 #endif | |
| 3385 | |
| 3386 #if defined(DUK_OPT_NO_AUGMENT_ERRORS) | |
| 3387 #undef DUK_USE_TRACEBACKS | |
| 3388 #elif defined(DUK_OPT_NO_TRACEBACKS) | |
| 3389 #undef DUK_USE_TRACEBACKS | |
| 3390 #else | |
| 3391 #define DUK_USE_TRACEBACKS | |
| 3392 #endif | |
| 3393 | |
| 3394 #if defined(DUK_OPT_TRACEBACK_DEPTH) | |
| 3395 #define DUK_USE_TRACEBACK_DEPTH DUK_OPT_TRACEBACK_DEPTH | |
| 3396 #else | |
| 3397 #define DUK_USE_TRACEBACK_DEPTH 10 | |
| 3398 #endif | |
| 3399 | |
| 3400 #if defined(DUK_OPT_DECLARE) | |
| 3401 #define DUK_USE_USER_DECLARE() DUK_OPT_DECLARE | |
| 3402 #else | |
| 3403 #define DUK_USE_USER_DECLARE() /* no user declarations */ | |
| 3404 #endif | |
| 3405 | |
| 3406 /* User provided InitJS. */ | |
| 3407 #undef DUK_USE_USER_INITJS | |
| 3408 #if defined(DUK_OPT_USER_INITJS) | |
| 3409 #define DUK_USE_USER_INITJS (DUK_OPT_USER_INITJS) | |
| 3410 #endif | |
| 3411 | |
| 3412 #if defined(DUK_OPT_VERBOSE_ERRORS) | |
| 3413 #define DUK_USE_VERBOSE_ERRORS | |
| 3414 #elif defined(DUK_OPT_NO_VERBOSE_ERRORS) | |
| 3415 #undef DUK_USE_VERBOSE_ERRORS | |
| 3416 #else | |
| 3417 #define DUK_USE_VERBOSE_ERRORS | |
| 3418 #endif | |
| 3419 | |
| 3420 #if defined(DUK_OPT_VOLUNTARY_GC) | |
| 3421 #define DUK_USE_VOLUNTARY_GC | |
| 3422 #elif defined(DUK_OPT_NO_VOLUNTARY_GC) | |
| 3423 #undef DUK_USE_VOLUNTARY_GC | |
| 3424 #else | |
| 3425 #define DUK_USE_VOLUNTARY_GC | |
| 3426 #endif | |
| 3427 | |
| 3428 #if defined(DUK_OPT_ZERO_BUFFER_DATA) | |
| 3429 #define DUK_USE_ZERO_BUFFER_DATA | |
| 3430 #elif defined(DUK_OPT_NO_ZERO_BUFFER_DATA) | |
| 3431 #undef DUK_USE_ZERO_BUFFER_DATA | |
| 3432 #else | |
| 3433 #define DUK_USE_ZERO_BUFFER_DATA | |
| 3434 #endif | |
| 3435 | |
| 3436 /* | |
| 3437 * Autogenerated defaults | |
| 3438 */ | |
| 3439 | |
| 3440 #define DUK_USE_AVOID_PLATFORM_FUNCPTRS | |
| 3441 #define DUK_USE_BASE64_FASTPATH | |
| 3442 #define DUK_USE_BUILTIN_INITJS | |
| 3443 #define DUK_USE_COMPILER_RECLIMIT 2500 | |
| 3444 #undef DUK_USE_DATE_FORMAT_STRING | |
| 3445 #undef DUK_USE_DATE_GET_LOCAL_TZOFFSET | |
| 3446 #undef DUK_USE_DATE_GET_NOW | |
| 3447 #undef DUK_USE_DATE_PARSE_STRING | |
| 3448 #undef DUK_USE_DATE_PRS_GETDATE | |
| 3449 #define DUK_USE_ESBC_LIMITS | |
| 3450 #define DUK_USE_ESBC_MAX_BYTES 2147418112L | |
| 3451 #define DUK_USE_ESBC_MAX_LINENUMBER 2147418112L | |
| 3452 #undef DUK_USE_EXEC_FUN_LOCAL | |
| 3453 #undef DUK_USE_EXPLICIT_NULL_INIT | |
| 3454 #define DUK_USE_FAST_REFCOUNT_DEFAULT | |
| 3455 #define DUK_USE_HEX_FASTPATH | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3456 #define DUK_USE_IDCHAR_FASTPATH |
| 3 | 3457 #undef DUK_USE_INTERRUPT_DEBUG_FIXUP |
| 3458 #define DUK_USE_JSON_DECNUMBER_FASTPATH | |
| 3459 #define DUK_USE_JSON_DECSTRING_FASTPATH | |
| 3460 #define DUK_USE_JSON_DEC_RECLIMIT 1000 | |
| 3461 #define DUK_USE_JSON_EATWHITE_FASTPATH | |
| 3462 #define DUK_USE_JSON_ENC_RECLIMIT 1000 | |
| 3463 #define DUK_USE_JSON_QUOTESTRING_FASTPATH | |
| 3464 #define DUK_USE_LEXER_SLIDING_WINDOW | |
| 3465 #undef DUK_USE_MARKANDSWEEP_FINALIZER_TORTURE | |
| 3466 #define DUK_USE_MARK_AND_SWEEP_RECLIMIT 256 | |
| 3467 #define DUK_USE_MATH_BUILTIN | |
| 3468 #define DUK_USE_NATIVE_CALL_RECLIMIT 1000 | |
| 3469 #undef DUK_USE_PANIC_EXIT | |
| 3470 #undef DUK_USE_PREFER_SIZE | |
| 3471 #define DUK_USE_PROVIDE_DEFAULT_ALLOC_FUNCTIONS | |
| 3472 #undef DUK_USE_REFZERO_FINALIZER_TORTURE | |
| 3473 #define DUK_USE_REGEXP_COMPILER_RECLIMIT 10000 | |
| 3474 #define DUK_USE_REGEXP_EXECUTOR_RECLIMIT 10000 | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3475 #define DUK_USE_ROM_PTRCOMP_FIRST 63488L |
| 3 | 3476 #undef DUK_USE_STRHASH_DENSE |
| 3477 #define DUK_USE_STRHASH_SKIP_SHIFT 5 | |
| 3478 #undef DUK_USE_VALSTACK_UNSAFE | |
| 3479 #define DUK_USE_VERBOSE_EXECUTOR_ERRORS | |
| 3480 | |
| 3481 /* | |
| 3482 * Alternative customization header | |
| 3483 * | |
| 3484 * If you want to modify the final DUK_USE_xxx flags directly (without | |
| 3485 * using the available DUK_OPT_xxx flags), define DUK_OPT_HAVE_CUSTOM_H | |
| 3486 * and tweak the final flags there. | |
| 3487 */ | |
| 3488 | |
| 3489 #if defined(DUK_OPT_HAVE_CUSTOM_H) | |
| 3490 #include "duk_custom.h" | |
| 3491 #endif | |
| 3492 | |
| 3493 /* | |
| 3494 * You may add overriding #define/#undef directives below for | |
| 3495 * customization. You of course cannot un-#include or un-typedef | |
| 3496 * anything; these require direct changes above. | |
| 3497 */ | |
| 3498 | |
| 3499 /* __OVERRIDE_DEFINES__ */ | |
| 3500 | |
| 3501 /* | |
| 3502 * Date provider selection | |
| 3503 * | |
| 3504 * User may define DUK_USE_DATE_GET_NOW() etc directly, in which case we'll | |
| 3505 * rely on an external provider. If this is not done, revert to previous | |
| 3506 * behavior and use Unix/Windows built-in provider. | |
| 3507 */ | |
| 3508 | |
| 3509 #if defined(DUK_COMPILING_DUKTAPE) | |
| 3510 | |
| 3511 #if defined(DUK_USE_DATE_GET_NOW) | |
| 3512 /* External provider already defined. */ | |
| 3513 #elif defined(DUK_USE_DATE_NOW_GETTIMEOFDAY) | |
| 3514 #define DUK_USE_DATE_GET_NOW(ctx) duk_bi_date_get_now_gettimeofday((ctx)) | |
| 3515 #elif defined(DUK_USE_DATE_NOW_TIME) | |
| 3516 #define DUK_USE_DATE_GET_NOW(ctx) duk_bi_date_get_now_time((ctx)) | |
| 3517 #elif defined(DUK_USE_DATE_NOW_WINDOWS) | |
| 3518 #define DUK_USE_DATE_GET_NOW(ctx) duk_bi_date_get_now_windows((ctx)) | |
| 3519 #else | |
| 3520 #error no provider for DUK_USE_DATE_GET_NOW() | |
| 3521 #endif | |
| 3522 | |
| 3523 #if defined(DUK_USE_DATE_GET_LOCAL_TZOFFSET) | |
| 3524 /* External provider already defined. */ | |
| 3525 #elif defined(DUK_USE_DATE_TZO_GMTIME_R) || defined(DUK_USE_DATE_TZO_GMTIME) | |
| 3526 #define DUK_USE_DATE_GET_LOCAL_TZOFFSET(d) duk_bi_date_get_local_tzoffset_gmtime((d)) | |
| 3527 #elif defined(DUK_USE_DATE_TZO_WINDOWS) | |
| 3528 #define DUK_USE_DATE_GET_LOCAL_TZOFFSET(d) duk_bi_date_get_local_tzoffset_windows((d)) | |
| 3529 #else | |
| 3530 #error no provider for DUK_USE_DATE_GET_LOCAL_TZOFFSET() | |
| 3531 #endif | |
| 3532 | |
| 3533 #if defined(DUK_USE_DATE_PARSE_STRING) | |
| 3534 /* External provider already defined. */ | |
| 3535 #elif defined(DUK_USE_DATE_PRS_STRPTIME) | |
| 3536 #define DUK_USE_DATE_PARSE_STRING(ctx,str) duk_bi_date_parse_string_strptime((ctx), (str)) | |
| 3537 #elif defined(DUK_USE_DATE_PRS_GETDATE) | |
| 3538 #define DUK_USE_DATE_PARSE_STRING(ctx,str) duk_bi_date_parse_string_getdate((ctx), (str)) | |
| 3539 #else | |
| 3540 /* No provider for DUK_USE_DATE_PARSE_STRING(), fall back to ISO 8601 only. */ | |
| 3541 #endif | |
| 3542 | |
| 3543 #if defined(DUK_USE_DATE_FORMAT_STRING) | |
| 3544 /* External provider already defined. */ | |
| 3545 #elif defined(DUK_USE_DATE_FMT_STRFTIME) | |
| 3546 #define DUK_USE_DATE_FORMAT_STRING(ctx,parts,tzoffset,flags) \ | |
| 3547 duk_bi_date_format_parts_strftime((ctx), (parts), (tzoffset), (flags)) | |
| 3548 #else | |
| 3549 /* No provider for DUK_USE_DATE_FORMAT_STRING(), fall back to ISO 8601 only. */ | |
| 3550 #endif | |
| 3551 | |
| 3552 #endif /* DUK_COMPILING_DUKTAPE */ | |
| 3553 | |
| 3554 /* | |
| 3555 * Checks for config option consistency (DUK_USE_xxx) | |
| 3556 */ | |
| 3557 | |
| 3558 #if defined(DUK_USE_32BIT_PTRS) | |
| 3559 #error unsupported config option used (option has been removed): DUK_USE_32BIT_PTRS | |
| 3560 #endif | |
| 3561 #if defined(DUK_USE_ALIGN_4) | |
| 3562 #error unsupported config option used (option has been removed): DUK_USE_ALIGN_4 | |
| 3563 #endif | |
| 3564 #if defined(DUK_USE_ALIGN_8) | |
| 3565 #error unsupported config option used (option has been removed): DUK_USE_ALIGN_8 | |
| 3566 #endif | |
| 3567 #if defined(DUK_USE_BYTEORDER_FORCED) | |
| 3568 #error unsupported config option used (option has been removed): DUK_USE_BYTEORDER_FORCED | |
| 3569 #endif | |
| 3570 #if defined(DUK_USE_DATAPTR_DEC16) && !defined(DUK_USE_DATAPTR16) | |
| 3571 #error config option DUK_USE_DATAPTR_DEC16 requires option DUK_USE_DATAPTR16 (which is missing) | |
| 3572 #endif | |
| 3573 #if defined(DUK_USE_DATAPTR_ENC16) && !defined(DUK_USE_DATAPTR16) | |
| 3574 #error config option DUK_USE_DATAPTR_ENC16 requires option DUK_USE_DATAPTR16 (which is missing) | |
| 3575 #endif | |
| 3576 #if defined(DUK_USE_DEBUGGER_SUPPORT) && !defined(DUK_USE_INTERRUPT_COUNTER) | |
| 3577 #error config option DUK_USE_DEBUGGER_SUPPORT requires option DUK_USE_INTERRUPT_COUNTER (which is missing) | |
| 3578 #endif | |
| 3579 #if defined(DUK_USE_DEEP_C_STACK) | |
| 3580 #error unsupported config option used (option has been removed): DUK_USE_DEEP_C_STACK | |
| 3581 #endif | |
| 3582 #if defined(DUK_USE_DOUBLE_BE) | |
| 3583 #error unsupported config option used (option has been removed): DUK_USE_DOUBLE_BE | |
| 3584 #endif | |
| 3585 #if defined(DUK_USE_DOUBLE_BE) && defined(DUK_USE_DOUBLE_LE) | |
| 3586 #error config option DUK_USE_DOUBLE_BE conflicts with option DUK_USE_DOUBLE_LE (which is also defined) | |
| 3587 #endif | |
| 3588 #if defined(DUK_USE_DOUBLE_BE) && defined(DUK_USE_DOUBLE_ME) | |
| 3589 #error config option DUK_USE_DOUBLE_BE conflicts with option DUK_USE_DOUBLE_ME (which is also defined) | |
| 3590 #endif | |
| 3591 #if defined(DUK_USE_DOUBLE_LE) | |
| 3592 #error unsupported config option used (option has been removed): DUK_USE_DOUBLE_LE | |
| 3593 #endif | |
| 3594 #if defined(DUK_USE_DOUBLE_LE) && defined(DUK_USE_DOUBLE_BE) | |
| 3595 #error config option DUK_USE_DOUBLE_LE conflicts with option DUK_USE_DOUBLE_BE (which is also defined) | |
| 3596 #endif | |
| 3597 #if defined(DUK_USE_DOUBLE_LE) && defined(DUK_USE_DOUBLE_ME) | |
| 3598 #error config option DUK_USE_DOUBLE_LE conflicts with option DUK_USE_DOUBLE_ME (which is also defined) | |
| 3599 #endif | |
| 3600 #if defined(DUK_USE_DOUBLE_ME) | |
| 3601 #error unsupported config option used (option has been removed): DUK_USE_DOUBLE_ME | |
| 3602 #endif | |
| 3603 #if defined(DUK_USE_DOUBLE_ME) && defined(DUK_USE_DOUBLE_LE) | |
| 3604 #error config option DUK_USE_DOUBLE_ME conflicts with option DUK_USE_DOUBLE_LE (which is also defined) | |
| 3605 #endif | |
| 3606 #if defined(DUK_USE_DOUBLE_ME) && defined(DUK_USE_DOUBLE_BE) | |
| 3607 #error config option DUK_USE_DOUBLE_ME conflicts with option DUK_USE_DOUBLE_BE (which is also defined) | |
| 3608 #endif | |
| 3609 #if defined(DUK_USE_DPRINT) && !defined(DUK_USE_DEBUG) | |
| 3610 #error config option DUK_USE_DPRINT requires option DUK_USE_DEBUG (which is missing) | |
| 3611 #endif | |
| 3612 #if defined(DUK_USE_ESBC_MAX_BYTES) && !defined(DUK_USE_ESBC_LIMITS) | |
| 3613 #error config option DUK_USE_ESBC_MAX_BYTES requires option DUK_USE_ESBC_LIMITS (which is missing) | |
| 3614 #endif | |
| 3615 #if defined(DUK_USE_ESBC_MAX_LINENUMBER) && !defined(DUK_USE_ESBC_LIMITS) | |
| 3616 #error config option DUK_USE_ESBC_MAX_LINENUMBER requires option DUK_USE_ESBC_LIMITS (which is missing) | |
| 3617 #endif | |
| 3618 #if defined(DUK_USE_EXEC_TIMEOUT_CHECK) && !defined(DUK_USE_INTERRUPT_COUNTER) | |
| 3619 #error config option DUK_USE_EXEC_TIMEOUT_CHECK requires option DUK_USE_INTERRUPT_COUNTER (which is missing) | |
| 3620 #endif | |
| 3621 #if defined(DUK_USE_EXTSTR_FREE) && !defined(DUK_USE_HSTRING_EXTDATA) | |
| 3622 #error config option DUK_USE_EXTSTR_FREE requires option DUK_USE_HSTRING_EXTDATA (which is missing) | |
| 3623 #endif | |
| 3624 #if defined(DUK_USE_EXTSTR_INTERN_CHECK) && !defined(DUK_USE_HSTRING_EXTDATA) | |
| 3625 #error config option DUK_USE_EXTSTR_INTERN_CHECK requires option DUK_USE_HSTRING_EXTDATA (which is missing) | |
| 3626 #endif | |
| 3627 #if defined(DUK_USE_FULL_TVAL) | |
| 3628 #error unsupported config option used (option has been removed): DUK_USE_FULL_TVAL | |
| 3629 #endif | |
| 3630 #if defined(DUK_USE_FUNCPTR_DEC16) && !defined(DUK_USE_FUNCPTR16) | |
| 3631 #error config option DUK_USE_FUNCPTR_DEC16 requires option DUK_USE_FUNCPTR16 (which is missing) | |
| 3632 #endif | |
| 3633 #if defined(DUK_USE_FUNCPTR_ENC16) && !defined(DUK_USE_FUNCPTR16) | |
| 3634 #error config option DUK_USE_FUNCPTR_ENC16 requires option DUK_USE_FUNCPTR16 (which is missing) | |
| 3635 #endif | |
| 3636 #if defined(DUK_USE_HASHBYTES_UNALIGNED_U32_ACCESS) | |
| 3637 #error unsupported config option used (option has been removed): DUK_USE_HASHBYTES_UNALIGNED_U32_ACCESS | |
| 3638 #endif | |
| 3639 #if defined(DUK_USE_HEAPPTR16) && defined(DUK_USE_DEBUG) | |
| 3640 #error config option DUK_USE_HEAPPTR16 conflicts with option DUK_USE_DEBUG (which is also defined) | |
| 3641 #endif | |
| 3642 #if defined(DUK_USE_HEAPPTR_DEC16) && !defined(DUK_USE_HEAPPTR16) | |
| 3643 #error config option DUK_USE_HEAPPTR_DEC16 requires option DUK_USE_HEAPPTR16 (which is missing) | |
| 3644 #endif | |
| 3645 #if defined(DUK_USE_HEAPPTR_ENC16) && !defined(DUK_USE_HEAPPTR16) | |
| 3646 #error config option DUK_USE_HEAPPTR_ENC16 requires option DUK_USE_HEAPPTR16 (which is missing) | |
| 3647 #endif | |
| 3648 #if defined(DUK_USE_INTEGER_BE) | |
| 3649 #error unsupported config option used (option has been removed): DUK_USE_INTEGER_BE | |
| 3650 #endif | |
| 3651 #if defined(DUK_USE_INTEGER_BE) && defined(DUK_USE_INTEGER_LE) | |
| 3652 #error config option DUK_USE_INTEGER_BE conflicts with option DUK_USE_INTEGER_LE (which is also defined) | |
| 3653 #endif | |
| 3654 #if defined(DUK_USE_INTEGER_BE) && defined(DUK_USE_INTEGER_ME) | |
| 3655 #error config option DUK_USE_INTEGER_BE conflicts with option DUK_USE_INTEGER_ME (which is also defined) | |
| 3656 #endif | |
| 3657 #if defined(DUK_USE_INTEGER_LE) | |
| 3658 #error unsupported config option used (option has been removed): DUK_USE_INTEGER_LE | |
| 3659 #endif | |
| 3660 #if defined(DUK_USE_INTEGER_LE) && defined(DUK_USE_INTEGER_BE) | |
| 3661 #error config option DUK_USE_INTEGER_LE conflicts with option DUK_USE_INTEGER_BE (which is also defined) | |
| 3662 #endif | |
| 3663 #if defined(DUK_USE_INTEGER_LE) && defined(DUK_USE_INTEGER_ME) | |
| 3664 #error config option DUK_USE_INTEGER_LE conflicts with option DUK_USE_INTEGER_ME (which is also defined) | |
| 3665 #endif | |
| 3666 #if defined(DUK_USE_INTEGER_ME) | |
| 3667 #error unsupported config option used (option has been removed): DUK_USE_INTEGER_ME | |
| 3668 #endif | |
| 3669 #if defined(DUK_USE_INTEGER_ME) && defined(DUK_USE_INTEGER_LE) | |
| 3670 #error config option DUK_USE_INTEGER_ME conflicts with option DUK_USE_INTEGER_LE (which is also defined) | |
| 3671 #endif | |
| 3672 #if defined(DUK_USE_INTEGER_ME) && defined(DUK_USE_INTEGER_BE) | |
| 3673 #error config option DUK_USE_INTEGER_ME conflicts with option DUK_USE_INTEGER_BE (which is also defined) | |
| 3674 #endif | |
| 3675 #if defined(DUK_USE_NO_DOUBLE_ALIASING_SELFTEST) | |
| 3676 #error unsupported config option used (option has been removed): DUK_USE_NO_DOUBLE_ALIASING_SELFTEST | |
| 3677 #endif | |
| 3678 #if defined(DUK_USE_PACKED_TVAL_POSSIBLE) | |
| 3679 #error unsupported config option used (option has been removed): DUK_USE_PACKED_TVAL_POSSIBLE | |
| 3680 #endif | |
| 3681 #if defined(DUK_USE_RDTSC) | |
| 3682 #error unsupported config option used (option has been removed): DUK_USE_RDTSC | |
| 3683 #endif | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3684 #if defined(DUK_USE_ROM_GLOBAL_CLONE) && !defined(DUK_USE_ROM_STRINGS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3685 #error config option DUK_USE_ROM_GLOBAL_CLONE requires option DUK_USE_ROM_STRINGS (which is missing) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3686 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3687 #if defined(DUK_USE_ROM_GLOBAL_CLONE) && !defined(DUK_USE_ROM_OBJECTS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3688 #error config option DUK_USE_ROM_GLOBAL_CLONE requires option DUK_USE_ROM_OBJECTS (which is missing) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3689 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3690 #if defined(DUK_USE_ROM_GLOBAL_CLONE) && defined(DUK_USE_ROM_GLOBAL_INHERIT) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3691 #error config option DUK_USE_ROM_GLOBAL_CLONE conflicts with option DUK_USE_ROM_GLOBAL_INHERIT (which is also defined) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3692 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3693 #if defined(DUK_USE_ROM_GLOBAL_INHERIT) && !defined(DUK_USE_ROM_STRINGS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3694 #error config option DUK_USE_ROM_GLOBAL_INHERIT requires option DUK_USE_ROM_STRINGS (which is missing) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3695 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3696 #if defined(DUK_USE_ROM_GLOBAL_INHERIT) && !defined(DUK_USE_ROM_OBJECTS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3697 #error config option DUK_USE_ROM_GLOBAL_INHERIT requires option DUK_USE_ROM_OBJECTS (which is missing) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3698 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3699 #if defined(DUK_USE_ROM_GLOBAL_INHERIT) && defined(DUK_USE_ROM_GLOBAL_CLONE) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3700 #error config option DUK_USE_ROM_GLOBAL_INHERIT conflicts with option DUK_USE_ROM_GLOBAL_CLONE (which is also defined) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3701 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3702 #if defined(DUK_USE_ROM_OBJECTS) && !defined(DUK_USE_ROM_STRINGS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3703 #error config option DUK_USE_ROM_OBJECTS requires option DUK_USE_ROM_STRINGS (which is missing) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3704 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3705 #if defined(DUK_USE_ROM_STRINGS) && !defined(DUK_USE_ROM_OBJECTS) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3706 #error config option DUK_USE_ROM_STRINGS requires option DUK_USE_ROM_OBJECTS (which is missing) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3707 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3708 #if defined(DUK_USE_SETJMP) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3709 #error unsupported config option used (option has been removed): DUK_USE_SETJMP |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3710 #endif |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3711 #if defined(DUK_USE_SIGSETJMP) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3712 #error unsupported config option used (option has been removed): DUK_USE_SIGSETJMP |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3713 #endif |
| 3 | 3714 #if defined(DUK_USE_STRTAB_CHAIN_SIZE) && !defined(DUK_USE_STRTAB_CHAIN) |
| 3715 #error config option DUK_USE_STRTAB_CHAIN_SIZE requires option DUK_USE_STRTAB_CHAIN (which is missing) | |
| 3716 #endif | |
| 3717 #if defined(DUK_USE_TAILCALL) && defined(DUK_USE_NONSTD_FUNC_CALLER_PROPERTY) | |
| 3718 #error config option DUK_USE_TAILCALL conflicts with option DUK_USE_NONSTD_FUNC_CALLER_PROPERTY (which is also defined) | |
| 3719 #endif | |
| 3720 #if defined(DUK_USE_UNALIGNED_ACCESSES_POSSIBLE) | |
| 3721 #error unsupported config option used (option has been removed): DUK_USE_UNALIGNED_ACCESSES_POSSIBLE | |
| 3722 #endif | |
|
14
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3723 #if defined(DUK_USE_UNDERSCORE_SETJMP) |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3724 #error unsupported config option used (option has been removed): DUK_USE_UNDERSCORE_SETJMP |
|
9acbab647d05
duktape: upgrade to 1.5.0
David Demelier <markand@malikania.fr>
parents:
3
diff
changeset
|
3725 #endif |
| 3 | 3726 |
| 3727 #if defined(DUK_USE_CPP_EXCEPTIONS) && !defined(__cplusplus) | |
| 3728 #error DUK_USE_CPP_EXCEPTIONS enabled but not compiling with a C++ compiler | |
| 3729 #endif | |
| 3730 | |
| 3731 /* | |
| 3732 * Convert DUK_USE_BYTEORDER, from whatever source, into currently used | |
| 3733 * internal defines. If detection failed, #error out. | |
| 3734 */ | |
| 3735 | |
| 3736 #if defined(DUK_USE_BYTEORDER) | |
| 3737 #if (DUK_USE_BYTEORDER == 1) | |
| 3738 #define DUK_USE_INTEGER_LE | |
| 3739 #define DUK_USE_DOUBLE_LE | |
| 3740 #elif (DUK_USE_BYTEORDER == 2) | |
| 3741 #define DUK_USE_INTEGER_LE /* integer endianness is little on purpose */ | |
| 3742 #define DUK_USE_DOUBLE_ME | |
| 3743 #elif (DUK_USE_BYTEORDER == 3) | |
| 3744 #define DUK_USE_INTEGER_BE | |
| 3745 #define DUK_USE_DOUBLE_BE | |
| 3746 #else | |
| 3747 #error unsupported: byte order invalid | |
| 3748 #endif /* byte order */ | |
| 3749 #else | |
| 3750 #error unsupported: byte order detection failed | |
| 3751 #endif /* defined(DUK_USE_BYTEORDER) */ | |
| 3752 | |
| 3753 #endif /* DUK_CONFIG_H_INCLUDED */ |