34#define LUAI_IS32INT ((UINT_MAX >> 30) >= 3)
54#define LUA_PATH_SEP ";"
55#define LUA_PATH_MARK "?"
56#define LUA_EXEC_DIR "!"
69#define LUA_VDIR LUA_VERSION_MAJOR "." LUA_VERSION_MINOR
75#define LUA_LDIR "!\\lua\\"
77#define LUA_SHRDIR "!\\..\\share\\lua\\" LUA_VDIR "\\"
79#if !defined(LUA_PATH_DEFAULT)
80#define LUA_PATH_DEFAULT \
81 LUA_LDIR"?.lua;" LUA_LDIR"?\\init.lua;" \
82 LUA_CDIR"?.lua;" LUA_CDIR"?\\init.lua;" \
83 LUA_SHRDIR"?.lua;" LUA_SHRDIR"?\\init.lua;" \
84 ".\\?.lua;" ".\\?\\init.lua"
87#if !defined(LUA_CPATH_DEFAULT)
88#define LUA_CPATH_DEFAULT \
90 LUA_CDIR"..\\lib\\lua\\" LUA_VDIR "\\?.dll;" \
91 LUA_CDIR"loadall.dll;" ".\\?.dll"
96#define LUA_ROOT "/usr/local/"
97#define LUA_LDIR LUA_ROOT "share/lua/" LUA_VDIR "/"
98#define LUA_CDIR LUA_ROOT "lib/lua/" LUA_VDIR "/"
100#if !defined(LUA_PATH_DEFAULT)
101#define LUA_PATH_DEFAULT \
102 LUA_LDIR"?.lua;" LUA_LDIR"?/init.lua;" \
103 LUA_CDIR"?.lua;" LUA_CDIR"?/init.lua;" \
104 "./?.lua;" "./?/init.lua"
107#if !defined(LUA_CPATH_DEFAULT)
108#define LUA_CPATH_DEFAULT \
109 LUA_CDIR"?.so;" LUA_CDIR"loadall.so;" "./?.so"
120#if !defined(LUA_DIRSEP)
123#define LUA_DIRSEP "\\"
125#define LUA_DIRSEP "/"
148#if defined(LUA_BUILD_AS_DLL)
150#if defined(LUA_CORE) || defined(LUA_LIB)
151#define LUA_API __declspec(dllexport)
153#define LUA_API __declspec(dllimport)
158#define LUA_API extern
166#define LUALIB_API LUA_API
167#define LUAMOD_API LUA_API
184#if defined(__GNUC__) && ((__GNUC__*100 + __GNUC_MINOR__) >= 302) && \
186#define LUAI_FUNC __attribute__((visibility("internal"))) extern
188#define LUAI_FUNC extern
191#define LUAI_DDEC(dec) LUAI_FUNC dec
208#if defined(LUA_COMPAT_5_3)
216#define LUA_COMPAT_MATHLIB
225#define LUA_COMPAT_APIINTCASTS
232#define LUA_COMPAT_LT_LE
242#define lua_strlen(L,i) lua_rawlen(L, (i))
244#define lua_objlen(L,i) lua_rawlen(L, (i))
246#define lua_equal(L,idx1,idx2) lua_compare(L,(idx1),(idx2),LUA_OPEQ)
247#define lua_lessthan(L,idx1,idx2) lua_compare(L,(idx1),(idx2),LUA_OPLT)
279#define l_floor(x) (l_mathop(floor)(x))
281#define lua_number2str(s,sz,n) \
282 l_sprintf((s), sz, LUA_NUMBER_FMT, (LUAI_UACNUMBER)(n))
293#define lua_numbertointeger(n,p) \
294 ((n) >= (LUA_NUMBER)(LUA_MININTEGER) && \
295 (n) < -(LUA_NUMBER)(LUA_MININTEGER) && \
296 (*(p) = (LUA_INTEGER)(n), 1))
301#define LUA_NUMBER float
303#define l_floatatt(n) (FLT_##n)
305#define LUAI_UACNUMBER double
307#define LUA_NUMBER_FRMLEN ""
308#define LUA_NUMBER_FMT "%.7f"
310#define l_mathop(op) op##f
315#define lua_str2number(s,p) strtof_rusefi((s), (p))
334#define LUA_INTEGER_FMT "%" LUA_INTEGER_FRMLEN "d"
336#define LUAI_UACINT LUA_INTEGER
338#define lua_integer2str(s,sz,n) \
339 l_sprintf((s), sz, LUA_INTEGER_FMT, (LUAI_UACINT)(n))
345#define LUA_UNSIGNED unsigned LUAI_UACINT
348#define LUA_UNSIGNEDBITS (sizeof(LUA_UNSIGNED) * CHAR_BIT)
353#define LUA_INTEGER int
354#define LUA_INTEGER_FRMLEN ""
356#define LUA_MAXINTEGER INT_MAX
357#define LUA_MININTEGER INT_MIN
359#define LUA_MAXUNSIGNED UINT_MAX
373 #define l_sprintf(s,sz,f,i) snprintf(s,sz,f,i)
378 #include "chprintf.h"
379 #define l_sprintf(s,sz,f,i) chsnprintf(s,sz,f,i)
388#if !defined(LUA_USE_C89)
389#define lua_strx2number(s,p) lua_str2number(s,p)
397#define lua_pointer2str(buff,sz,p) l_sprintf(buff,sz,"%p",p)
406#if !defined(LUA_USE_C89)
407#define lua_number2strx(L,b,sz,f,n) \
408 ((void)L, l_sprintf(b,sz,f,(LUAI_UACNUMBER)(n)))
418#if defined(LUA_USE_C89) || (defined(HUGE_VAL) && !defined(HUGE_VALF))
421#define l_mathop(op) (lua_Number)op
422#define lua_str2number(s,p) ((lua_Number)strtod((s), (p)))
432#define LUA_KCONTEXT ptrdiff_t
434#if !defined(LUA_USE_C89) && defined(__STDC_VERSION__) && \
435 __STDC_VERSION__ >= 199901L
437#if defined(INTPTR_MAX)
439#define LUA_KCONTEXT intptr_t
449#if !defined(lua_getlocaledecpoint)
450#define lua_getlocaledecpoint() '.'
460#if !defined(luai_likely)
462#if defined(__GNUC__) && !defined(LUA_NOBUILTIN)
463#define luai_likely(x) (__builtin_expect(((x) != 0), 1))
464#define luai_unlikely(x) (__builtin_expect(((x) != 0), 0))
466#define luai_likely(x) (x)
467#define luai_unlikely(x) (x)
473#if defined(LUA_CORE) || defined(LUA_LIB)
475#define l_likely(x) luai_likely(x)
476#define l_unlikely(x) luai_unlikely(x)
504#if defined(LUA_USE_APICHECK)
506#define luai_apicheck(l,e) assert(e)
528#define LUAI_MAXSTACK 1000000
530#define LUAI_MAXSTACK 15000
539#define LUA_EXTRASPACE (sizeof(void *))
553#define LUAL_BUFFERSIZE ((int)(16 * sizeof(void*) * sizeof(lua_Number)))
560#define LUAI_MAXALIGN lua_Number n; double u; void *s; lua_Integer i; long l
float strtof_rusefi(const char *, char **)