StdLib/Include/Lua/luaconf.h

   1 /*
   2 ** $Id: luaconf.h,v 1.176.1.1 2013/04/12 18:48:47 roberto Exp $
   3 ** Configuration file for Lua
   4 ** See Copyright Notice in lua.h
   5 */
   6
   7
   8 #ifndef lconfig_h
   9 #define lconfig_h
  10
  11 #include <limits.h>
  12 #include <stddef.h>
  13
  14
  15 /*
  16 ** ==================================================================
  17 ** Search for "@@" to find all configurable definitions.
  18 ** ===================================================================
  19 */
  20
  21 #if defined(_DOS_WATCOM) || defined(UEFI_C_SOURCE)
  22 #undef _WIN32
  23 #define LUA_ANSI
  24 #endif
  25
  26 /*
  27 @@ LUA_ANSI controls the use of non-ansi features.
  28 ** CHANGE it (define it) if you want Lua to avoid the use of any
  29 ** non-ansi feature or library.
  30 */
  31 #if !defined(LUA_ANSI) && defined(__STRICT_ANSI__)
  32 #define LUA_ANSI
  33 #endif
  34
  35
  36 #if !defined(LUA_ANSI) && defined(_WIN32) && !defined(_WIN32_WCE)
  37 #define LUA_WIN     /* enable goodies for regular Windows platforms */
  38 #endif
  39
  40 #if defined(LUA_WIN)
  41 #define LUA_DL_DLL
  42 #define LUA_USE_AFORMAT     /* assume 'printf' handles 'aA' specifiers */
  43 #endif
  44
  45 #if defined(LUA_USE_LINUX)
  46 #define LUA_USE_POSIX
  47 #define LUA_USE_DLOPEN      /* needs an extra library: -ldl */
  48 #define LUA_USE_READLINE    /* needs some extra libraries */
  49 #define LUA_USE_STRTODHEX   /* assume 'strtod' handles hex formats */
  50 #define LUA_USE_AFORMAT     /* assume 'printf' handles 'aA' specifiers */
  51 #define LUA_USE_LONGLONG    /* assume support for long long */
  52 #endif
  53
  54 #if defined(LUA_USE_MACOSX)
  55 #define LUA_USE_POSIX
  56 #define LUA_USE_DLOPEN      /* does not need -ldl */
  57 #define LUA_USE_READLINE    /* needs an extra library: -lreadline */
  58 #define LUA_USE_STRTODHEX   /* assume 'strtod' handles hex formats */
  59 #define LUA_USE_AFORMAT     /* assume 'printf' handles 'aA' specifiers */
  60 #define LUA_USE_LONGLONG    /* assume support for long long */
  61 #endif
  62
  63 /*
  64 @@ LUA_USE_POSIX includes all functionality listed as X/Open System
  65 @* Interfaces Extension (XSI).
  66 ** CHANGE it (define it) if your system is XSI compatible.
  67 */
  68 #if defined(LUA_USE_POSIX)
  69 #define LUA_USE_MKSTEMP
  70 #define LUA_USE_ISATTY
  71 #define LUA_USE_POPEN
  72 #define LUA_USE_ULONGJMP
  73 #define LUA_USE_GMTIME_R
  74 #endif
  75
  76
  77
  78 /*
  79 @@ LUA_PATH_DEFAULT is the default path that Lua uses to look for
  80 @* Lua libraries.
  81 @@ LUA_CPATH_DEFAULT is the default path that Lua uses to look for
  82 @* C libraries.
  83 ** CHANGE them if your machine has a non-conventional directory
  84 ** hierarchy or if you want to install your libraries in
  85 ** non-conventional directories.
  86 */
  87 #if defined(_WIN32) /* { */
  88 /*
  89 ** In Windows, any exclamation mark ('!') in the path is replaced by the
  90 ** path of the directory of the executable file of the current process.
  91 */
  92 #define LUA_LDIR    "!\\lua\\"
  93 #define LUA_CDIR    "!\\"
  94 #define LUA_PATH_DEFAULT  \
  95         LUA_LDIR"?.lua;"  LUA_LDIR"?\\init.lua;" \
  96         LUA_CDIR"?.lua;"  LUA_CDIR"?\\init.lua;" ".\\?.lua"
  97 #define LUA_CPATH_DEFAULT \
  98         LUA_CDIR"?.dll;" LUA_CDIR"loadall.dll;" ".\\?.dll"
  99
 100 #else           /* }{ */
 101
 102 #define LUA_VDIR    LUA_VERSION_MAJOR "." LUA_VERSION_MINOR "/"
 103 #define LUA_ROOT    "/usr/local/"
 104 #define LUA_LDIR    LUA_ROOT "share/lua/" LUA_VDIR
 105 #define LUA_CDIR    LUA_ROOT "lib/lua/" LUA_VDIR
 106 #define LUA_PATH_DEFAULT  \
 107         LUA_LDIR"?.lua;"  LUA_LDIR"?/init.lua;" \
 108         LUA_CDIR"?.lua;"  LUA_CDIR"?/init.lua;" "./?.lua"
 109 #define LUA_CPATH_DEFAULT \
 110         LUA_CDIR"?.so;" LUA_CDIR"loadall.so;" "./?.so"
 111 #endif          /* } */
 112
 113
 114 /*
 115 @@ LUA_DIRSEP is the directory separator (for submodules).
 116 ** CHANGE it if your machine does not use "/" as the directory separator
 117 ** and is not Windows. (On Windows Lua automatically uses "\".)
 118 */
 119 #if defined(_WIN32) || defined (_DOS_WATCOM) || defined(_EFI)
 120 #define LUA_DIRSEP  "\\"
 121 #else
 122 #define LUA_DIRSEP  "/"
 123 #endif
 124
 125
 126 /*
 127 @@ LUA_ENV is the name of the variable that holds the current
 128 @@ environment, used to access global names.
 129 ** CHANGE it if you do not like this name.
 130 */
 131 #define LUA_ENV     "_ENV"
 132
 133
 134 /*
 135 @@ LUA_API is a mark for all core API functions.
 136 @@ LUALIB_API is a mark for all auxiliary library functions.
 137 @@ LUAMOD_API is a mark for all standard library opening functions.
 138 ** CHANGE them if you need to define those functions in some special way.
 139 ** For instance, if you want to create one Windows DLL with the core and
 140 ** the libraries, you may want to use the following definition (define
 141 ** LUA_BUILD_AS_DLL to get it).
 142 */
 143 #if defined(LUA_BUILD_AS_DLL)   /* { */
 144
 145 #if defined(LUA_CORE) || defined(LUA_LIB)   /* { */
 146 #define LUA_API __declspec(dllexport)
 147 #else                       /* }{ */
 148 #define LUA_API __declspec(dllimport)
 149 #endif                      /* } */
 150
 151 #else               /* }{ */
 152
 153 #define LUA_API     extern
 154
 155 #endif              /* } */
 156
 157
 158 /* more often than not the libs go together with the core */
 159 #define LUALIB_API  LUA_API
 160 #define LUAMOD_API  LUALIB_API
 161
 162
 163 /*
 164 @@ LUAI_FUNC is a mark for all extern functions that are not to be
 165 @* exported to outside modules.
 166 @@ LUAI_DDEF and LUAI_DDEC are marks for all extern (const) variables
 167 @* that are not to be exported to outside modules (LUAI_DDEF for
 168 @* definitions and LUAI_DDEC for declarations).
 169 ** CHANGE them if you need to mark them in some special way. Elf/gcc
 170 ** (versions 3.2 and later) mark them as "hidden" to optimize access
 171 ** when Lua is compiled as a shared library. Not all elf targets support
 172 ** this attribute. Unfortunately, gcc does not offer a way to check
 173 ** whether the target offers that support, and those without support
 174 ** give a warning about it. To avoid these warnings, change to the
 175 ** default definition.
 176 */
 177 #if defined(__GNUC__) && ((__GNUC__*100 + __GNUC_MINOR__) >= 302) && \
 178     defined(__ELF__)        /* { */
 179 #define LUAI_FUNC   __attribute__((visibility("hidden"))) extern
 180 #define LUAI_DDEC   LUAI_FUNC
 181 #define LUAI_DDEF   /* empty */
 182
 183 #else               /* }{ */
 184 #define LUAI_FUNC   extern
 185 #define LUAI_DDEC   extern
 186 #define LUAI_DDEF   /* empty */
 187 #endif              /* } */
 188
 189
 190
 191 /*
 192 @@ LUA_QL describes how error messages quote program elements.
 193 ** CHANGE it if you want a different appearance.
 194 */
 195 #define LUA_QL(x)   "'" x "'"
 196 #define LUA_QS      LUA_QL("%s")
 197
 198
 199 /*
 200 @@ LUA_IDSIZE gives the maximum size for the description of the source
 201 @* of a function in debug information.
 202 ** CHANGE it if you want a different size.
 203 */
 204 #define LUA_IDSIZE  60
 205
 206
 207 /*
 208 @@ luai_writestring/luai_writeline define how 'print' prints its results.
 209 ** They are only used in libraries and the stand-alone program. (The #if
 210 ** avoids including 'stdio.h' everywhere.)
 211 */
 212 #if defined(LUA_LIB) || defined(lua_c)
 213 #include <stdio.h>
 214 #define luai_writestring(s,l)   fwrite((s), sizeof(char), (l), stdout)
 215 #define luai_writeline()    (luai_writestring("\n", 1), fflush(stdout))
 216 #endif
 217
 218 /*
 219 @@ luai_writestringerror defines how to print error messages.
 220 ** (A format string with one argument is enough for Lua...)
 221 */
 222 #define luai_writestringerror(s,p) \
 223     (fprintf(stderr, (s), (p)), fflush(stderr))
 224
 225
 226 /*
 227 @@ LUAI_MAXSHORTLEN is the maximum length for short strings, that is,
 228 ** strings that are internalized. (Cannot be smaller than reserved words
 229 ** or tags for metamethods, as these strings must be internalized;
 230 ** #("function") = 8, #("__newindex") = 10.)
 231 */
 232 #define LUAI_MAXSHORTLEN        40
 233
 234
 235
 236 /*
 237 ** {==================================================================
 238 ** Compatibility with previous versions
 239 ** ===================================================================
 240 */
 241
 242 /*
 243 @@ LUA_COMPAT_ALL controls all compatibility options.
 244 ** You can define it to get all options, or change specific options
 245 ** to fit your specific needs.
 246 */
 247 #if defined(LUA_COMPAT_ALL) /* { */
 248
 249 /*
 250 @@ LUA_COMPAT_UNPACK controls the presence of global 'unpack'.
 251 ** You can replace it with 'table.unpack'.
 252 */
 253 #define LUA_COMPAT_UNPACK
 254
 255 /*
 256 @@ LUA_COMPAT_LOADERS controls the presence of table 'package.loaders'.
 257 ** You can replace it with 'package.searchers'.
 258 */
 259 #define LUA_COMPAT_LOADERS
 260
 261 /*
 262 @@ macro 'lua_cpcall' emulates deprecated function lua_cpcall.
 263 ** You can call your C function directly (with light C functions).
 264 */
 265 #define lua_cpcall(L,f,u)  \
 266     (lua_pushcfunction(L, (f)), \
 267      lua_pushlightuserdata(L,(u)), \
 268      lua_pcall(L,1,0,0))
 269
 270
 271 /*
 272 @@ LUA_COMPAT_LOG10 defines the function 'log10' in the math library.
 273 ** You can rewrite 'log10(x)' as 'log(x, 10)'.
 274 */
 275 #define LUA_COMPAT_LOG10
 276
 277 /*
 278 @@ LUA_COMPAT_LOADSTRING defines the function 'loadstring' in the base
 279 ** library. You can rewrite 'loadstring(s)' as 'load(s)'.
 280 */
 281 #define LUA_COMPAT_LOADSTRING
 282
 283 /*
 284 @@ LUA_COMPAT_MAXN defines the function 'maxn' in the table library.
 285 */
 286 #define LUA_COMPAT_MAXN
 287
 288 /*
 289 @@ The following macros supply trivial compatibility for some
 290 ** changes in the API. The macros themselves document how to
 291 ** change your code to avoid using them.
 292 */
 293 #define lua_strlen(L,i)     lua_rawlen(L, (i))
 294
 295 #define lua_objlen(L,i)     lua_rawlen(L, (i))
 296
 297 #define lua_equal(L,idx1,idx2)      lua_compare(L,(idx1),(idx2),LUA_OPEQ)
 298 #define lua_lessthan(L,idx1,idx2)   lua_compare(L,(idx1),(idx2),LUA_OPLT)
 299
 300 /*
 301 @@ LUA_COMPAT_MODULE controls compatibility with previous
 302 ** module functions 'module' (Lua) and 'luaL_register' (C).
 303 */
 304 #define LUA_COMPAT_MODULE
 305
 306 #endif              /* } */
 307
 308 /* }================================================================== */
 309
 310
 311
 312 /*
 313 @@ LUAI_BITSINT defines the number of bits in an int.
 314 ** CHANGE here if Lua cannot automatically detect the number of bits of
 315 ** your machine. Probably you do not need to change this.
 316 */
 317 /* avoid overflows in comparison */
 318 #if INT_MAX-20 < 32760      /* { */
 319 #define LUAI_BITSINT    16
 320 #elif INT_MAX > 2147483640L /* }{ */
 321 /* int has at least 32 bits */
 322 #define LUAI_BITSINT    32
 323 #else               /* }{ */
 324 #error "you must define LUA_BITSINT with number of bits in an integer"
 325 #endif              /* } */
 326
 327
 328 /*
 329 @@ LUA_INT32 is an signed integer with exactly 32 bits.
 330 @@ LUAI_UMEM is an unsigned integer big enough to count the total
 331 @* memory used by Lua.
 332 @@ LUAI_MEM is a signed integer big enough to count the total memory
 333 @* used by Lua.
 334 ** CHANGE here if for some weird reason the default definitions are not
 335 ** good enough for your machine. Probably you do not need to change
 336 ** this.
 337 */
 338 #if LUAI_BITSINT >= 32      /* { */
 339 #define LUA_INT32   int
 340 #define LUAI_UMEM   size_t
 341 #define LUAI_MEM    ptrdiff_t
 342 #else               /* }{ */
 343 /* 16-bit ints */
 344 #define LUA_INT32   long
 345 #define LUAI_UMEM   unsigned long
 346 #define LUAI_MEM    long
 347 #endif              /* } */
 348
 349
 350 /*
 351 @@ LUAI_MAXSTACK limits the size of the Lua stack.
 352 ** CHANGE it if you need a different limit. This limit is arbitrary;
 353 ** its only purpose is to stop Lua to consume unlimited stack
 354 ** space (and to reserve some numbers for pseudo-indices).
 355 */
 356 #if LUAI_BITSINT >= 32
 357 #define LUAI_MAXSTACK       1000000
 358 #else
 359 #define LUAI_MAXSTACK       15000
 360 #endif
 361
 362 /* reserve some space for error handling */
 363 #define LUAI_FIRSTPSEUDOIDX (-LUAI_MAXSTACK - 1000)
 364
 365
 366
 367
 368 /*
 369 @@ LUAL_BUFFERSIZE is the buffer size used by the lauxlib buffer system.
 370 ** CHANGE it if it uses too much C-stack space.
 371 */
 372 #define LUAL_BUFFERSIZE     BUFSIZ
 373
 374
 375
 376
 377 /*
 378 ** {==================================================================
 379 @@ LUA_NUMBER is the type of numbers in Lua.
 380 ** CHANGE the following definitions only if you want to build Lua
 381 ** with a number type different from double. You may also need to
 382 ** change lua_number2int & lua_number2integer.
 383 ** ===================================================================
 384 */
 385
 386 #define LUA_NUMBER_DOUBLE
 387 #define LUA_NUMBER  double
 388
 389 /*
 390 @@ LUAI_UACNUMBER is the result of an 'usual argument conversion'
 391 @* over a number.
 392 */
 393 #define LUAI_UACNUMBER  double
 394
 395 /*
 396 @@ LUA_NUMBER_SCAN is the format for reading numbers.
 397 @@ LUA_NUMBER_FMT is the format for writing numbers.
 398 @@ lua_number2str converts a number to a string.
 399 @@ LUAI_MAXNUMBER2STR is maximum size of previous conversion.
 400 */
 401 #define LUA_NUMBER_SCAN     "%lf"
 402 #define LUA_NUMBER_FMT      "%.14g"
 403 #define lua_number2str(s,n) sprintf((s), LUA_NUMBER_FMT, (n))
 404 #define LUAI_MAXNUMBER2STR  32 /* 16 digits, sign, point, and \0 */
 405
 406
 407 /*
 408 @@ l_mathop allows the addition of an 'l' or 'f' to all math operations
 409 */
 410 #define l_mathop(x)     (x)
 411
 412
 413 /*
 414 @@ lua_str2number converts a decimal numeric string to a number.
 415 @@ lua_strx2number converts an hexadecimal numeric string to a number.
 416 ** In C99, 'strtod' does both conversions. C89, however, has no function
 417 ** to convert floating hexadecimal strings to numbers. For these
 418 ** systems, you can leave 'lua_strx2number' undefined and Lua will
 419 ** provide its own implementation.
 420 */
 421 #define lua_str2number(s,p) strtod((s), (p))
 422
 423 #if defined(LUA_USE_STRTODHEX)
 424 #define lua_strx2number(s,p)    strtod((s), (p))
 425 #endif
 426
 427
 428 /*
 429 @@ The luai_num* macros define the primitive operations over numbers.
 430 */
 431
 432 /* the following operations need the math library */
 433 #if defined(lobject_c) || defined(lvm_c)
 434 #include <math.h>
 435 #define luai_nummod(L,a,b)  ((a) - l_mathop(floor)((a)/(b))*(b))
 436 #define luai_numpow(L,a,b)  (l_mathop(pow)(a,b))
 437 #endif
 438
 439 /* these are quite standard operations */
 440 #if defined(LUA_CORE)
 441 #define luai_numadd(L,a,b)  ((a)+(b))
 442 #define luai_numsub(L,a,b)  ((a)-(b))
 443 #define luai_nummul(L,a,b)  ((a)*(b))
 444 #define luai_numdiv(L,a,b)  ((a)/(b))
 445 #define luai_numunm(L,a)    (-(a))
 446 #define luai_numeq(a,b)     ((a)==(b))
 447 #define luai_numlt(L,a,b)   ((a)<(b))
 448 #define luai_numle(L,a,b)   ((a)<=(b))
 449 #define luai_numisnan(L,a)  (!luai_numeq((a), (a)))
 450 #endif
 451
 452
 453
 454 /*
 455 @@ LUA_INTEGER is the integral type used by lua_pushinteger/lua_tointeger.
 456 ** CHANGE that if ptrdiff_t is not adequate on your machine. (On most
 457 ** machines, ptrdiff_t gives a good choice between int or long.)
 458 */
 459 #define LUA_INTEGER ptrdiff_t
 460
 461 /*
 462 @@ LUA_UNSIGNED is the integral type used by lua_pushunsigned/lua_tounsigned.
 463 ** It must have at least 32 bits.
 464 */
 465 #define LUA_UNSIGNED    unsigned LUA_INT32
 466
 467
 468
 469 /*
 470 ** Some tricks with doubles
 471 */
 472
 473 #if defined(LUA_NUMBER_DOUBLE) && !defined(LUA_ANSI)    /* { */
 474 /*
 475 ** The next definitions activate some tricks to speed up the
 476 ** conversion from doubles to integer types, mainly to LUA_UNSIGNED.
 477 **
 478 @@ LUA_MSASMTRICK uses Microsoft assembler to avoid clashes with a
 479 ** DirectX idiosyncrasy.
 480 **
 481 @@ LUA_IEEE754TRICK uses a trick that should work on any machine
 482 ** using IEEE754 with a 32-bit integer type.
 483 **
 484 @@ LUA_IEEELL extends the trick to LUA_INTEGER; should only be
 485 ** defined when LUA_INTEGER is a 32-bit integer.
 486 **
 487 @@ LUA_IEEEENDIAN is the endianness of doubles in your machine
 488 ** (0 for little endian, 1 for big endian); if not defined, Lua will
 489 ** check it dynamically for LUA_IEEE754TRICK (but not for LUA_NANTRICK).
 490 **
 491 @@ LUA_NANTRICK controls the use of a trick to pack all types into
 492 ** a single double value, using NaN values to represent non-number
 493 ** values. The trick only works on 32-bit machines (ints and pointers
 494 ** are 32-bit values) with numbers represented as IEEE 754-2008 doubles
 495 ** with conventional endianess (12345678 or 87654321), in CPUs that do
 496 ** not produce signaling NaN values (all NaNs are quiet).
 497 */
 498
 499 /* Microsoft compiler on a Pentium (32 bit) ? */
 500 #if defined(LUA_WIN) && defined(_MSC_VER) && defined(_M_IX86)   /* { */
 501
 502 #define LUA_MSASMTRICK
 503 #define LUA_IEEEENDIAN      0
 504 #define LUA_NANTRICK
 505
 506
 507 /* pentium 32 bits? */
 508 #elif defined(__i386__) || defined(__i386) || defined(__X86__) /* }{ */
 509
 510 #define LUA_IEEE754TRICK
 511 #define LUA_IEEELL
 512 #define LUA_IEEEENDIAN      0
 513 #define LUA_NANTRICK
 514
 515 /* pentium 64 bits? */
 516 #elif defined(__x86_64)                     /* }{ */
 517
 518 #define LUA_IEEE754TRICK
 519 #define LUA_IEEEENDIAN      0
 520
 521 #elif defined(__POWERPC__) || defined(__ppc__)          /* }{ */
 522
 523 #define LUA_IEEE754TRICK
 524 #define LUA_IEEEENDIAN      1
 525
 526 #else                               /* }{ */
 527
 528 /* assume IEEE754 and a 32-bit integer type */
 529 #define LUA_IEEE754TRICK
 530
 531 #endif                              /* } */
 532
 533 #endif                          /* } */
 534
 535 /* }================================================================== */
 536
 537
 538
 539
 540 /* =================================================================== */
 541
 542 /*
 543 ** Local configuration. You can use this space to add your redefinitions
 544 ** without modifying the main part of the file.
 545 */
 546
 547
 548
 549 #endif
 550