"Fossies" - the Fresh Open Source Software Archive

Member "memcached-1.6.15/vendor/lua/src/luaconf.h" (1 Oct 2021, 21511 Bytes) of package /linux/www/memcached-1.6.15.tar.gz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) C and C++ source code syntax highlighting (style: standard) with prefixed line numbers and code folding option. Alternatively you can here view or download the uninterpreted source code file.

    1 /*
    2 ** $Id: luaconf.h $
    3 ** Configuration file for Lua
    4 ** See Copyright Notice in lua.h
    5 */
    6 
    7 
    8 #ifndef luaconf_h
    9 #define luaconf_h
   10 
   11 #include <limits.h>
   12 #include <stddef.h>
   13 
   14 
   15 /*
   16 ** ===================================================================
   17 ** General Configuration File for Lua
   18 **
   19 ** Some definitions here can be changed externally, through the compiler
   20 ** (e.g., with '-D' options): They are commented out or protected
   21 ** by '#if !defined' guards. However, several other definitions
   22 ** should be changed directly here, either because they affect the
   23 ** Lua ABI (by making the changes here, you ensure that all software
   24 ** connected to Lua, such as C libraries, will be compiled with the same
   25 ** configuration); or because they are seldom changed.
   26 **
   27 ** Search for "@@" to find all configurable definitions.
   28 ** ===================================================================
   29 */
   30 
   31 
   32 /*
   33 ** {====================================================================
   34 ** System Configuration: macros to adapt (if needed) Lua to some
   35 ** particular platform, for instance restricting it to C89.
   36 ** =====================================================================
   37 */
   38 
   39 /*
   40 @@ LUA_USE_C89 controls the use of non-ISO-C89 features.
   41 ** Define it if you want Lua to avoid the use of a few C99 features
   42 ** or Windows-specific features on Windows.
   43 */
   44 /* #define LUA_USE_C89 */
   45 
   46 
   47 /*
   48 ** By default, Lua on Windows use (some) specific Windows features
   49 */
   50 #if !defined(LUA_USE_C89) && defined(_WIN32) && !defined(_WIN32_WCE)
   51 #define LUA_USE_WINDOWS  /* enable goodies for regular Windows */
   52 #endif
   53 
   54 
   55 #if defined(LUA_USE_WINDOWS)
   56 #define LUA_DL_DLL  /* enable support for DLL */
   57 #define LUA_USE_C89 /* broadly, Windows is C89 */
   58 #endif
   59 
   60 
   61 #if defined(LUA_USE_LINUX)
   62 #define LUA_USE_POSIX
   63 #define LUA_USE_DLOPEN      /* needs an extra library: -ldl */
   64 #endif
   65 
   66 
   67 #if defined(LUA_USE_MACOSX)
   68 #define LUA_USE_POSIX
   69 #define LUA_USE_DLOPEN      /* MacOS does not need -ldl */
   70 #endif
   71 
   72 
   73 /*
   74 @@ LUAI_IS32INT is true iff 'int' has (at least) 32 bits.
   75 */
   76 #define LUAI_IS32INT    ((UINT_MAX >> 30) >= 3)
   77 
   78 /* }================================================================== */
   79 
   80 
   81 
   82 /*
   83 ** {==================================================================
   84 ** Configuration for Number types. These options should not be
   85 ** set externally, because any other code connected to Lua must
   86 ** use the same configuration.
   87 ** ===================================================================
   88 */
   89 
   90 /*
   91 @@ LUA_INT_TYPE defines the type for Lua integers.
   92 @@ LUA_FLOAT_TYPE defines the type for Lua floats.
   93 ** Lua should work fine with any mix of these options supported
   94 ** by your C compiler. The usual configurations are 64-bit integers
   95 ** and 'double' (the default), 32-bit integers and 'float' (for
   96 ** restricted platforms), and 'long'/'double' (for C compilers not
   97 ** compliant with C99, which may not have support for 'long long').
   98 */
   99 
  100 /* predefined options for LUA_INT_TYPE */
  101 #define LUA_INT_INT     1
  102 #define LUA_INT_LONG        2
  103 #define LUA_INT_LONGLONG    3
  104 
  105 /* predefined options for LUA_FLOAT_TYPE */
  106 #define LUA_FLOAT_FLOAT     1
  107 #define LUA_FLOAT_DOUBLE    2
  108 #define LUA_FLOAT_LONGDOUBLE    3
  109 
  110 
  111 /* Default configuration ('long long' and 'double', for 64-bit Lua) */
  112 #define LUA_INT_DEFAULT     LUA_INT_LONGLONG
  113 #define LUA_FLOAT_DEFAULT   LUA_FLOAT_DOUBLE
  114 
  115 
  116 /*
  117 @@ LUA_32BITS enables Lua with 32-bit integers and 32-bit floats.
  118 */
  119 #define LUA_32BITS  0
  120 
  121 
  122 /*
  123 @@ LUA_C89_NUMBERS ensures that Lua uses the largest types available for
  124 ** C89 ('long' and 'double'); Windows always has '__int64', so it does
  125 ** not need to use this case.
  126 */
  127 #if defined(LUA_USE_C89) && !defined(LUA_USE_WINDOWS)
  128 #define LUA_C89_NUMBERS     1
  129 #else
  130 #define LUA_C89_NUMBERS     0
  131 #endif
  132 
  133 
  134 #if LUA_32BITS      /* { */
  135 /*
  136 ** 32-bit integers and 'float'
  137 */
  138 #if LUAI_IS32INT  /* use 'int' if big enough */
  139 #define LUA_INT_TYPE    LUA_INT_INT
  140 #else  /* otherwise use 'long' */
  141 #define LUA_INT_TYPE    LUA_INT_LONG
  142 #endif
  143 #define LUA_FLOAT_TYPE  LUA_FLOAT_FLOAT
  144 
  145 #elif LUA_C89_NUMBERS   /* }{ */
  146 /*
  147 ** largest types available for C89 ('long' and 'double')
  148 */
  149 #define LUA_INT_TYPE    LUA_INT_LONG
  150 #define LUA_FLOAT_TYPE  LUA_FLOAT_DOUBLE
  151 
  152 #else       /* }{ */
  153 /* use defaults */
  154 
  155 #define LUA_INT_TYPE    LUA_INT_DEFAULT
  156 #define LUA_FLOAT_TYPE  LUA_FLOAT_DEFAULT
  157 
  158 #endif              /* } */
  159 
  160 
  161 /* }================================================================== */
  162 
  163 
  164 
  165 /*
  166 ** {==================================================================
  167 ** Configuration for Paths.
  168 ** ===================================================================
  169 */
  170 
  171 /*
  172 ** LUA_PATH_SEP is the character that separates templates in a path.
  173 ** LUA_PATH_MARK is the string that marks the substitution points in a
  174 ** template.
  175 ** LUA_EXEC_DIR in a Windows path is replaced by the executable's
  176 ** directory.
  177 */
  178 #define LUA_PATH_SEP            ";"
  179 #define LUA_PATH_MARK           "?"
  180 #define LUA_EXEC_DIR            "!"
  181 
  182 
  183 /*
  184 @@ LUA_PATH_DEFAULT is the default path that Lua uses to look for
  185 ** Lua libraries.
  186 @@ LUA_CPATH_DEFAULT is the default path that Lua uses to look for
  187 ** C libraries.
  188 ** CHANGE them if your machine has a non-conventional directory
  189 ** hierarchy or if you want to install your libraries in
  190 ** non-conventional directories.
  191 */
  192 
  193 #define LUA_VDIR    LUA_VERSION_MAJOR "." LUA_VERSION_MINOR
  194 #if defined(_WIN32) /* { */
  195 /*
  196 ** In Windows, any exclamation mark ('!') in the path is replaced by the
  197 ** path of the directory of the executable file of the current process.
  198 */
  199 #define LUA_LDIR    "!\\lua\\"
  200 #define LUA_CDIR    "!\\"
  201 #define LUA_SHRDIR  "!\\..\\share\\lua\\" LUA_VDIR "\\"
  202 
  203 #if !defined(LUA_PATH_DEFAULT)
  204 #define LUA_PATH_DEFAULT  \
  205         LUA_LDIR"?.lua;"  LUA_LDIR"?\\init.lua;" \
  206         LUA_CDIR"?.lua;"  LUA_CDIR"?\\init.lua;" \
  207         LUA_SHRDIR"?.lua;" LUA_SHRDIR"?\\init.lua;" \
  208         ".\\?.lua;" ".\\?\\init.lua"
  209 #endif
  210 
  211 #if !defined(LUA_CPATH_DEFAULT)
  212 #define LUA_CPATH_DEFAULT \
  213         LUA_CDIR"?.dll;" \
  214         LUA_CDIR"..\\lib\\lua\\" LUA_VDIR "\\?.dll;" \
  215         LUA_CDIR"loadall.dll;" ".\\?.dll"
  216 #endif
  217 
  218 #else           /* }{ */
  219 
  220 #define LUA_ROOT    "/usr/local/"
  221 #define LUA_LDIR    LUA_ROOT "share/lua/" LUA_VDIR "/"
  222 #define LUA_CDIR    LUA_ROOT "lib/lua/" LUA_VDIR "/"
  223 
  224 #if !defined(LUA_PATH_DEFAULT)
  225 #define LUA_PATH_DEFAULT  \
  226         LUA_LDIR"?.lua;"  LUA_LDIR"?/init.lua;" \
  227         LUA_CDIR"?.lua;"  LUA_CDIR"?/init.lua;" \
  228         "./?.lua;" "./?/init.lua"
  229 #endif
  230 
  231 #if !defined(LUA_CPATH_DEFAULT)
  232 #define LUA_CPATH_DEFAULT \
  233         LUA_CDIR"?.so;" LUA_CDIR"loadall.so;" "./?.so"
  234 #endif
  235 
  236 #endif          /* } */
  237 
  238 
  239 /*
  240 @@ LUA_DIRSEP is the directory separator (for submodules).
  241 ** CHANGE it if your machine does not use "/" as the directory separator
  242 ** and is not Windows. (On Windows Lua automatically uses "\".)
  243 */
  244 #if !defined(LUA_DIRSEP)
  245 
  246 #if defined(_WIN32)
  247 #define LUA_DIRSEP  "\\"
  248 #else
  249 #define LUA_DIRSEP  "/"
  250 #endif
  251 
  252 #endif
  253 
  254 /* }================================================================== */
  255 
  256 
  257 /*
  258 ** {==================================================================
  259 ** Marks for exported symbols in the C code
  260 ** ===================================================================
  261 */
  262 
  263 /*
  264 @@ LUA_API is a mark for all core API functions.
  265 @@ LUALIB_API is a mark for all auxiliary library functions.
  266 @@ LUAMOD_API is a mark for all standard library opening functions.
  267 ** CHANGE them if you need to define those functions in some special way.
  268 ** For instance, if you want to create one Windows DLL with the core and
  269 ** the libraries, you may want to use the following definition (define
  270 ** LUA_BUILD_AS_DLL to get it).
  271 */
  272 #if defined(LUA_BUILD_AS_DLL)   /* { */
  273 
  274 #if defined(LUA_CORE) || defined(LUA_LIB)   /* { */
  275 #define LUA_API __declspec(dllexport)
  276 #else                       /* }{ */
  277 #define LUA_API __declspec(dllimport)
  278 #endif                      /* } */
  279 
  280 #else               /* }{ */
  281 
  282 #define LUA_API     extern
  283 
  284 #endif              /* } */
  285 
  286 
  287 /*
  288 ** More often than not the libs go together with the core.
  289 */
  290 #define LUALIB_API  LUA_API
  291 #define LUAMOD_API  LUA_API
  292 
  293 
  294 /*
  295 @@ LUAI_FUNC is a mark for all extern functions that are not to be
  296 ** exported to outside modules.
  297 @@ LUAI_DDEF and LUAI_DDEC are marks for all extern (const) variables,
  298 ** none of which to be exported to outside modules (LUAI_DDEF for
  299 ** definitions and LUAI_DDEC for declarations).
  300 ** CHANGE them if you need to mark them in some special way. Elf/gcc
  301 ** (versions 3.2 and later) mark them as "hidden" to optimize access
  302 ** when Lua is compiled as a shared library. Not all elf targets support
  303 ** this attribute. Unfortunately, gcc does not offer a way to check
  304 ** whether the target offers that support, and those without support
  305 ** give a warning about it. To avoid these warnings, change to the
  306 ** default definition.
  307 */
  308 #if defined(__GNUC__) && ((__GNUC__*100 + __GNUC_MINOR__) >= 302) && \
  309     defined(__ELF__)        /* { */
  310 #define LUAI_FUNC   __attribute__((visibility("internal"))) extern
  311 #else               /* }{ */
  312 #define LUAI_FUNC   extern
  313 #endif              /* } */
  314 
  315 #define LUAI_DDEC(dec)  LUAI_FUNC dec
  316 #define LUAI_DDEF   /* empty */
  317 
  318 /* }================================================================== */
  319 
  320 
  321 /*
  322 ** {==================================================================
  323 ** Compatibility with previous versions
  324 ** ===================================================================
  325 */
  326 
  327 /*
  328 @@ LUA_COMPAT_5_3 controls other macros for compatibility with Lua 5.3.
  329 ** You can define it to get all options, or change specific options
  330 ** to fit your specific needs.
  331 */
  332 #if defined(LUA_COMPAT_5_3) /* { */
  333 
  334 /*
  335 @@ LUA_COMPAT_MATHLIB controls the presence of several deprecated
  336 ** functions in the mathematical library.
  337 ** (These functions were already officially removed in 5.3;
  338 ** nevertheless they are still available here.)
  339 */
  340 #define LUA_COMPAT_MATHLIB
  341 
  342 /*
  343 @@ LUA_COMPAT_APIINTCASTS controls the presence of macros for
  344 ** manipulating other integer types (lua_pushunsigned, lua_tounsigned,
  345 ** luaL_checkint, luaL_checklong, etc.)
  346 ** (These macros were also officially removed in 5.3, but they are still
  347 ** available here.)
  348 */
  349 #define LUA_COMPAT_APIINTCASTS
  350 
  351 
  352 /*
  353 @@ LUA_COMPAT_LT_LE controls the emulation of the '__le' metamethod
  354 ** using '__lt'.
  355 */
  356 #define LUA_COMPAT_LT_LE
  357 
  358 
  359 /*
  360 @@ The following macros supply trivial compatibility for some
  361 ** changes in the API. The macros themselves document how to
  362 ** change your code to avoid using them.
  363 ** (Once more, these macros were officially removed in 5.3, but they are
  364 ** still available here.)
  365 */
  366 #define lua_strlen(L,i)     lua_rawlen(L, (i))
  367 
  368 #define lua_objlen(L,i)     lua_rawlen(L, (i))
  369 
  370 #define lua_equal(L,idx1,idx2)      lua_compare(L,(idx1),(idx2),LUA_OPEQ)
  371 #define lua_lessthan(L,idx1,idx2)   lua_compare(L,(idx1),(idx2),LUA_OPLT)
  372 
  373 #endif              /* } */
  374 
  375 /* }================================================================== */
  376 
  377 
  378 
  379 /*
  380 ** {==================================================================
  381 ** Configuration for Numbers (low-level part).
  382 ** Change these definitions if no predefined LUA_FLOAT_* / LUA_INT_*
  383 ** satisfy your needs.
  384 ** ===================================================================
  385 */
  386 
  387 /*
  388 @@ LUAI_UACNUMBER is the result of a 'default argument promotion'
  389 @@ over a floating number.
  390 @@ l_floatatt(x) corrects float attribute 'x' to the proper float type
  391 ** by prefixing it with one of FLT/DBL/LDBL.
  392 @@ LUA_NUMBER_FRMLEN is the length modifier for writing floats.
  393 @@ LUA_NUMBER_FMT is the format for writing floats.
  394 @@ lua_number2str converts a float to a string.
  395 @@ l_mathop allows the addition of an 'l' or 'f' to all math operations.
  396 @@ l_floor takes the floor of a float.
  397 @@ lua_str2number converts a decimal numeral to a number.
  398 */
  399 
  400 
  401 /* The following definitions are good for most cases here */
  402 
  403 #define l_floor(x)      (l_mathop(floor)(x))
  404 
  405 #define lua_number2str(s,sz,n)  \
  406     l_sprintf((s), sz, LUA_NUMBER_FMT, (LUAI_UACNUMBER)(n))
  407 
  408 /*
  409 @@ lua_numbertointeger converts a float number with an integral value
  410 ** to an integer, or returns 0 if float is not within the range of
  411 ** a lua_Integer.  (The range comparisons are tricky because of
  412 ** rounding. The tests here assume a two-complement representation,
  413 ** where MININTEGER always has an exact representation as a float;
  414 ** MAXINTEGER may not have one, and therefore its conversion to float
  415 ** may have an ill-defined value.)
  416 */
  417 #define lua_numbertointeger(n,p) \
  418   ((n) >= (LUA_NUMBER)(LUA_MININTEGER) && \
  419    (n) < -(LUA_NUMBER)(LUA_MININTEGER) && \
  420       (*(p) = (LUA_INTEGER)(n), 1))
  421 
  422 
  423 /* now the variable definitions */
  424 
  425 #if LUA_FLOAT_TYPE == LUA_FLOAT_FLOAT       /* { single float */
  426 
  427 #define LUA_NUMBER  float
  428 
  429 #define l_floatatt(n)       (FLT_##n)
  430 
  431 #define LUAI_UACNUMBER  double
  432 
  433 #define LUA_NUMBER_FRMLEN   ""
  434 #define LUA_NUMBER_FMT      "%.7g"
  435 
  436 #define l_mathop(op)        op##f
  437 
  438 #define lua_str2number(s,p) strtof((s), (p))
  439 
  440 
  441 #elif LUA_FLOAT_TYPE == LUA_FLOAT_LONGDOUBLE    /* }{ long double */
  442 
  443 #define LUA_NUMBER  long double
  444 
  445 #define l_floatatt(n)       (LDBL_##n)
  446 
  447 #define LUAI_UACNUMBER  long double
  448 
  449 #define LUA_NUMBER_FRMLEN   "L"
  450 #define LUA_NUMBER_FMT      "%.19Lg"
  451 
  452 #define l_mathop(op)        op##l
  453 
  454 #define lua_str2number(s,p) strtold((s), (p))
  455 
  456 #elif LUA_FLOAT_TYPE == LUA_FLOAT_DOUBLE    /* }{ double */
  457 
  458 #define LUA_NUMBER  double
  459 
  460 #define l_floatatt(n)       (DBL_##n)
  461 
  462 #define LUAI_UACNUMBER  double
  463 
  464 #define LUA_NUMBER_FRMLEN   ""
  465 #define LUA_NUMBER_FMT      "%.14g"
  466 
  467 #define l_mathop(op)        op
  468 
  469 #define lua_str2number(s,p) strtod((s), (p))
  470 
  471 #else                       /* }{ */
  472 
  473 #error "numeric float type not defined"
  474 
  475 #endif                  /* } */
  476 
  477 
  478 
  479 /*
  480 @@ LUA_UNSIGNED is the unsigned version of LUA_INTEGER.
  481 @@ LUAI_UACINT is the result of a 'default argument promotion'
  482 @@ over a LUA_INTEGER.
  483 @@ LUA_INTEGER_FRMLEN is the length modifier for reading/writing integers.
  484 @@ LUA_INTEGER_FMT is the format for writing integers.
  485 @@ LUA_MAXINTEGER is the maximum value for a LUA_INTEGER.
  486 @@ LUA_MININTEGER is the minimum value for a LUA_INTEGER.
  487 @@ LUA_MAXUNSIGNED is the maximum value for a LUA_UNSIGNED.
  488 @@ LUA_UNSIGNEDBITS is the number of bits in a LUA_UNSIGNED.
  489 @@ lua_integer2str converts an integer to a string.
  490 */
  491 
  492 
  493 /* The following definitions are good for most cases here */
  494 
  495 #define LUA_INTEGER_FMT     "%" LUA_INTEGER_FRMLEN "d"
  496 
  497 #define LUAI_UACINT     LUA_INTEGER
  498 
  499 #define lua_integer2str(s,sz,n)  \
  500     l_sprintf((s), sz, LUA_INTEGER_FMT, (LUAI_UACINT)(n))
  501 
  502 /*
  503 ** use LUAI_UACINT here to avoid problems with promotions (which
  504 ** can turn a comparison between unsigneds into a signed comparison)
  505 */
  506 #define LUA_UNSIGNED        unsigned LUAI_UACINT
  507 
  508 
  509 #define LUA_UNSIGNEDBITS    (sizeof(LUA_UNSIGNED) * CHAR_BIT)
  510 
  511 
  512 /* now the variable definitions */
  513 
  514 #if LUA_INT_TYPE == LUA_INT_INT     /* { int */
  515 
  516 #define LUA_INTEGER     int
  517 #define LUA_INTEGER_FRMLEN  ""
  518 
  519 #define LUA_MAXINTEGER      INT_MAX
  520 #define LUA_MININTEGER      INT_MIN
  521 
  522 #define LUA_MAXUNSIGNED     UINT_MAX
  523 
  524 #elif LUA_INT_TYPE == LUA_INT_LONG  /* }{ long */
  525 
  526 #define LUA_INTEGER     long
  527 #define LUA_INTEGER_FRMLEN  "l"
  528 
  529 #define LUA_MAXINTEGER      LONG_MAX
  530 #define LUA_MININTEGER      LONG_MIN
  531 
  532 #define LUA_MAXUNSIGNED     ULONG_MAX
  533 
  534 #elif LUA_INT_TYPE == LUA_INT_LONGLONG  /* }{ long long */
  535 
  536 /* use presence of macro LLONG_MAX as proxy for C99 compliance */
  537 #if defined(LLONG_MAX)      /* { */
  538 /* use ISO C99 stuff */
  539 
  540 #define LUA_INTEGER     long long
  541 #define LUA_INTEGER_FRMLEN  "ll"
  542 
  543 #define LUA_MAXINTEGER      LLONG_MAX
  544 #define LUA_MININTEGER      LLONG_MIN
  545 
  546 #define LUA_MAXUNSIGNED     ULLONG_MAX
  547 
  548 #elif defined(LUA_USE_WINDOWS) /* }{ */
  549 /* in Windows, can use specific Windows types */
  550 
  551 #define LUA_INTEGER     __int64
  552 #define LUA_INTEGER_FRMLEN  "I64"
  553 
  554 #define LUA_MAXINTEGER      _I64_MAX
  555 #define LUA_MININTEGER      _I64_MIN
  556 
  557 #define LUA_MAXUNSIGNED     _UI64_MAX
  558 
  559 #else               /* }{ */
  560 
  561 #error "Compiler does not support 'long long'. Use option '-DLUA_32BITS' \
  562   or '-DLUA_C89_NUMBERS' (see file 'luaconf.h' for details)"
  563 
  564 #endif              /* } */
  565 
  566 #else               /* }{ */
  567 
  568 #error "numeric integer type not defined"
  569 
  570 #endif              /* } */
  571 
  572 /* }================================================================== */
  573 
  574 
  575 /*
  576 ** {==================================================================
  577 ** Dependencies with C99 and other C details
  578 ** ===================================================================
  579 */
  580 
  581 /*
  582 @@ l_sprintf is equivalent to 'snprintf' or 'sprintf' in C89.
  583 ** (All uses in Lua have only one format item.)
  584 */
  585 #if !defined(LUA_USE_C89)
  586 #define l_sprintf(s,sz,f,i) snprintf(s,sz,f,i)
  587 #else
  588 #define l_sprintf(s,sz,f,i) ((void)(sz), sprintf(s,f,i))
  589 #endif
  590 
  591 
  592 /*
  593 @@ lua_strx2number converts a hexadecimal numeral to a number.
  594 ** In C99, 'strtod' does that conversion. Otherwise, you can
  595 ** leave 'lua_strx2number' undefined and Lua will provide its own
  596 ** implementation.
  597 */
  598 #if !defined(LUA_USE_C89)
  599 #define lua_strx2number(s,p)        lua_str2number(s,p)
  600 #endif
  601 
  602 
  603 /*
  604 @@ lua_pointer2str converts a pointer to a readable string in a
  605 ** non-specified way.
  606 */
  607 #define lua_pointer2str(buff,sz,p)  l_sprintf(buff,sz,"%p",p)
  608 
  609 
  610 /*
  611 @@ lua_number2strx converts a float to a hexadecimal numeral.
  612 ** In C99, 'sprintf' (with format specifiers '%a'/'%A') does that.
  613 ** Otherwise, you can leave 'lua_number2strx' undefined and Lua will
  614 ** provide its own implementation.
  615 */
  616 #if !defined(LUA_USE_C89)
  617 #define lua_number2strx(L,b,sz,f,n)  \
  618     ((void)L, l_sprintf(b,sz,f,(LUAI_UACNUMBER)(n)))
  619 #endif
  620 
  621 
  622 /*
  623 ** 'strtof' and 'opf' variants for math functions are not valid in
  624 ** C89. Otherwise, the macro 'HUGE_VALF' is a good proxy for testing the
  625 ** availability of these variants. ('math.h' is already included in
  626 ** all files that use these macros.)
  627 */
  628 #if defined(LUA_USE_C89) || (defined(HUGE_VAL) && !defined(HUGE_VALF))
  629 #undef l_mathop  /* variants not available */
  630 #undef lua_str2number
  631 #define l_mathop(op)        (lua_Number)op  /* no variant */
  632 #define lua_str2number(s,p) ((lua_Number)strtod((s), (p)))
  633 #endif
  634 
  635 
  636 /*
  637 @@ LUA_KCONTEXT is the type of the context ('ctx') for continuation
  638 ** functions.  It must be a numerical type; Lua will use 'intptr_t' if
  639 ** available, otherwise it will use 'ptrdiff_t' (the nearest thing to
  640 ** 'intptr_t' in C89)
  641 */
  642 #define LUA_KCONTEXT    ptrdiff_t
  643 
  644 #if !defined(LUA_USE_C89) && defined(__STDC_VERSION__) && \
  645     __STDC_VERSION__ >= 199901L
  646 #include <stdint.h>
  647 #if defined(INTPTR_MAX)  /* even in C99 this type is optional */
  648 #undef LUA_KCONTEXT
  649 #define LUA_KCONTEXT    intptr_t
  650 #endif
  651 #endif
  652 
  653 
  654 /*
  655 @@ lua_getlocaledecpoint gets the locale "radix character" (decimal point).
  656 ** Change that if you do not want to use C locales. (Code using this
  657 ** macro must include the header 'locale.h'.)
  658 */
  659 #if !defined(lua_getlocaledecpoint)
  660 #define lua_getlocaledecpoint()     (localeconv()->decimal_point[0])
  661 #endif
  662 
  663 
  664 /*
  665 ** macros to improve jump prediction, used mostly for error handling
  666 ** and debug facilities. (Some macros in the Lua API use these macros.
  667 ** Define LUA_NOBUILTIN if you do not want '__builtin_expect' in your
  668 ** code.)
  669 */
  670 #if !defined(luai_likely)
  671 
  672 #if defined(__GNUC__) && !defined(LUA_NOBUILTIN)
  673 #define luai_likely(x)      (__builtin_expect(((x) != 0), 1))
  674 #define luai_unlikely(x)    (__builtin_expect(((x) != 0), 0))
  675 #else
  676 #define luai_likely(x)      (x)
  677 #define luai_unlikely(x)    (x)
  678 #endif
  679 
  680 #endif
  681 
  682 
  683 #if defined(LUA_CORE) || defined(LUA_LIB)
  684 /* shorter names for Lua's own use */
  685 #define l_likely(x) luai_likely(x)
  686 #define l_unlikely(x)   luai_unlikely(x)
  687 #endif
  688 
  689 
  690 
  691 /* }================================================================== */
  692 
  693 
  694 /*
  695 ** {==================================================================
  696 ** Language Variations
  697 ** =====================================================================
  698 */
  699 
  700 /*
  701 @@ LUA_NOCVTN2S/LUA_NOCVTS2N control how Lua performs some
  702 ** coercions. Define LUA_NOCVTN2S to turn off automatic coercion from
  703 ** numbers to strings. Define LUA_NOCVTS2N to turn off automatic
  704 ** coercion from strings to numbers.
  705 */
  706 /* #define LUA_NOCVTN2S */
  707 /* #define LUA_NOCVTS2N */
  708 
  709 
  710 /*
  711 @@ LUA_USE_APICHECK turns on several consistency checks on the C API.
  712 ** Define it as a help when debugging C code.
  713 */
  714 #if defined(LUA_USE_APICHECK)
  715 #include <assert.h>
  716 #define luai_apicheck(l,e)  assert(e)
  717 #endif
  718 
  719 /* }================================================================== */
  720 
  721 
  722 /*
  723 ** {==================================================================
  724 ** Macros that affect the API and must be stable (that is, must be the
  725 ** same when you compile Lua and when you compile code that links to
  726 ** Lua).
  727 ** =====================================================================
  728 */
  729 
  730 /*
  731 @@ LUAI_MAXSTACK limits the size of the Lua stack.
  732 ** CHANGE it if you need a different limit. This limit is arbitrary;
  733 ** its only purpose is to stop Lua from consuming unlimited stack
  734 ** space (and to reserve some numbers for pseudo-indices).
  735 ** (It must fit into max(size_t)/32.)
  736 */
  737 #if LUAI_IS32INT
  738 #define LUAI_MAXSTACK       1000000
  739 #else
  740 #define LUAI_MAXSTACK       15000
  741 #endif
  742 
  743 
  744 /*
  745 @@ LUA_EXTRASPACE defines the size of a raw memory area associated with
  746 ** a Lua state with very fast access.
  747 ** CHANGE it if you need a different size.
  748 */
  749 #define LUA_EXTRASPACE      (sizeof(void *))
  750 
  751 
  752 /*
  753 @@ LUA_IDSIZE gives the maximum size for the description of the source
  754 @@ of a function in debug information.
  755 ** CHANGE it if you want a different size.
  756 */
  757 #define LUA_IDSIZE  60
  758 
  759 
  760 /*
  761 @@ LUAL_BUFFERSIZE is the buffer size used by the lauxlib buffer system.
  762 */
  763 #define LUAL_BUFFERSIZE   ((int)(16 * sizeof(void*) * sizeof(lua_Number)))
  764 
  765 
  766 /*
  767 @@ LUAI_MAXALIGN defines fields that, when used in a union, ensure
  768 ** maximum alignment for the other items in that union.
  769 */
  770 #define LUAI_MAXALIGN  lua_Number n; double u; void *s; lua_Integer i; long l
  771 
  772 /* }================================================================== */
  773 
  774 
  775 
  776 
  777 
  778 /* =================================================================== */
  779 
  780 /*
  781 ** Local configuration. You can use this space to add your redefinitions
  782 ** without modifying the main part of the file.
  783 */
  784 
  785 
  786 
  787 
  788 
  789 #endif
  790