Mercurial > mm7
comparison lib/lua/lua-5.2.2/luaconf.h @ 1866:41cc4dd3c122
Lua 5.2.2 added.
author | Nomad |
---|---|
date | Wed, 16 Oct 2013 13:34:26 +0200 |
parents | |
children |
comparison
equal
deleted
inserted
replaced
1848:3b39b70e8e93 | 1866:41cc4dd3c122 |
---|---|
1 /* | |
2 ** $Id: luaconf.h,v 1.176 2013/03/16 21:10:18 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 | |
22 /* | |
23 @@ LUA_ANSI controls the use of non-ansi features. | |
24 ** CHANGE it (define it) if you want Lua to avoid the use of any | |
25 ** non-ansi feature or library. | |
26 */ | |
27 #if !defined(LUA_ANSI) && defined(__STRICT_ANSI__) | |
28 #define LUA_ANSI | |
29 #endif | |
30 | |
31 | |
32 #if !defined(LUA_ANSI) && defined(_WIN32) && !defined(_WIN32_WCE) | |
33 #define LUA_WIN /* enable goodies for regular Windows platforms */ | |
34 #endif | |
35 | |
36 #if defined(LUA_WIN) | |
37 #define LUA_DL_DLL | |
38 #define LUA_USE_AFORMAT /* assume 'printf' handles 'aA' specifiers */ | |
39 #endif | |
40 | |
41 | |
42 | |
43 #if defined(LUA_USE_LINUX) | |
44 #define LUA_USE_POSIX | |
45 #define LUA_USE_DLOPEN /* needs an extra library: -ldl */ | |
46 #define LUA_USE_READLINE /* needs some extra libraries */ | |
47 #define LUA_USE_STRTODHEX /* assume 'strtod' handles hex formats */ | |
48 #define LUA_USE_AFORMAT /* assume 'printf' handles 'aA' specifiers */ | |
49 #define LUA_USE_LONGLONG /* assume support for long long */ | |
50 #endif | |
51 | |
52 #if defined(LUA_USE_MACOSX) | |
53 #define LUA_USE_POSIX | |
54 #define LUA_USE_DLOPEN /* does not need -ldl */ | |
55 #define LUA_USE_READLINE /* needs an extra library: -lreadline */ | |
56 #define LUA_USE_STRTODHEX /* assume 'strtod' handles hex formats */ | |
57 #define LUA_USE_AFORMAT /* assume 'printf' handles 'aA' specifiers */ | |
58 #define LUA_USE_LONGLONG /* assume support for long long */ | |
59 #endif | |
60 | |
61 | |
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) | |
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 /* | |
397 @@ LUA_NUMBER_SCAN is the format for reading numbers. | |
398 @@ LUA_NUMBER_FMT is the format for writing numbers. | |
399 @@ lua_number2str converts a number to a string. | |
400 @@ LUAI_MAXNUMBER2STR is maximum size of previous conversion. | |
401 */ | |
402 #define LUA_NUMBER_SCAN "%lf" | |
403 #define LUA_NUMBER_FMT "%.14g" | |
404 #define lua_number2str(s,n) sprintf((s), LUA_NUMBER_FMT, (n)) | |
405 #define LUAI_MAXNUMBER2STR 32 /* 16 digits, sign, point, and \0 */ | |
406 | |
407 | |
408 /* | |
409 @@ l_mathop allows the addition of an 'l' or 'f' to all math operations | |
410 */ | |
411 #define l_mathop(x) (x) | |
412 | |
413 | |
414 /* | |
415 @@ lua_str2number converts a decimal numeric string to a number. | |
416 @@ lua_strx2number converts an hexadecimal numeric string to a number. | |
417 ** In C99, 'strtod' does both conversions. C89, however, has no function | |
418 ** to convert floating hexadecimal strings to numbers. For these | |
419 ** systems, you can leave 'lua_strx2number' undefined and Lua will | |
420 ** provide its own implementation. | |
421 */ | |
422 #define lua_str2number(s,p) strtod((s), (p)) | |
423 | |
424 #if defined(LUA_USE_STRTODHEX) | |
425 #define lua_strx2number(s,p) strtod((s), (p)) | |
426 #endif | |
427 | |
428 | |
429 /* | |
430 @@ The luai_num* macros define the primitive operations over numbers. | |
431 */ | |
432 | |
433 /* the following operations need the math library */ | |
434 #if defined(lobject_c) || defined(lvm_c) | |
435 #include <math.h> | |
436 #define luai_nummod(L,a,b) ((a) - l_mathop(floor)((a)/(b))*(b)) | |
437 #define luai_numpow(L,a,b) (l_mathop(pow)(a,b)) | |
438 #endif | |
439 | |
440 /* these are quite standard operations */ | |
441 #if defined(LUA_CORE) | |
442 #define luai_numadd(L,a,b) ((a)+(b)) | |
443 #define luai_numsub(L,a,b) ((a)-(b)) | |
444 #define luai_nummul(L,a,b) ((a)*(b)) | |
445 #define luai_numdiv(L,a,b) ((a)/(b)) | |
446 #define luai_numunm(L,a) (-(a)) | |
447 #define luai_numeq(a,b) ((a)==(b)) | |
448 #define luai_numlt(L,a,b) ((a)<(b)) | |
449 #define luai_numle(L,a,b) ((a)<=(b)) | |
450 #define luai_numisnan(L,a) (!luai_numeq((a), (a))) | |
451 #endif | |
452 | |
453 | |
454 | |
455 /* | |
456 @@ LUA_INTEGER is the integral type used by lua_pushinteger/lua_tointeger. | |
457 ** CHANGE that if ptrdiff_t is not adequate on your machine. (On most | |
458 ** machines, ptrdiff_t gives a good choice between int or long.) | |
459 */ | |
460 #define LUA_INTEGER ptrdiff_t | |
461 | |
462 /* | |
463 @@ LUA_UNSIGNED is the integral type used by lua_pushunsigned/lua_tounsigned. | |
464 ** It must have at least 32 bits. | |
465 */ | |
466 #define LUA_UNSIGNED unsigned LUA_INT32 | |
467 | |
468 | |
469 | |
470 /* | |
471 ** Some tricks with doubles | |
472 */ | |
473 | |
474 #if defined(LUA_NUMBER_DOUBLE) && !defined(LUA_ANSI) /* { */ | |
475 /* | |
476 ** The next definitions activate some tricks to speed up the | |
477 ** conversion from doubles to integer types, mainly to LUA_UNSIGNED. | |
478 ** | |
479 @@ LUA_MSASMTRICK uses Microsoft assembler to avoid clashes with a | |
480 ** DirectX idiosyncrasy. | |
481 ** | |
482 @@ LUA_IEEE754TRICK uses a trick that should work on any machine | |
483 ** using IEEE754 with a 32-bit integer type. | |
484 ** | |
485 @@ LUA_IEEELL extends the trick to LUA_INTEGER; should only be | |
486 ** defined when LUA_INTEGER is a 32-bit integer. | |
487 ** | |
488 @@ LUA_IEEEENDIAN is the endianness of doubles in your machine | |
489 ** (0 for little endian, 1 for big endian); if not defined, Lua will | |
490 ** check it dynamically for LUA_IEEE754TRICK (but not for LUA_NANTRICK). | |
491 ** | |
492 @@ LUA_NANTRICK controls the use of a trick to pack all types into | |
493 ** a single double value, using NaN values to represent non-number | |
494 ** values. The trick only works on 32-bit machines (ints and pointers | |
495 ** are 32-bit values) with numbers represented as IEEE 754-2008 doubles | |
496 ** with conventional endianess (12345678 or 87654321), in CPUs that do | |
497 ** not produce signaling NaN values (all NaNs are quiet). | |
498 */ | |
499 | |
500 /* Microsoft compiler on a Pentium (32 bit) ? */ | |
501 #if defined(LUA_WIN) && defined(_MSC_VER) && defined(_M_IX86) /* { */ | |
502 | |
503 #define LUA_MSASMTRICK | |
504 #define LUA_IEEEENDIAN 0 | |
505 #define LUA_NANTRICK | |
506 | |
507 | |
508 /* pentium 32 bits? */ | |
509 #elif defined(__i386__) || defined(__i386) || defined(__X86__) /* }{ */ | |
510 | |
511 #define LUA_IEEE754TRICK | |
512 #define LUA_IEEELL | |
513 #define LUA_IEEEENDIAN 0 | |
514 #define LUA_NANTRICK | |
515 | |
516 /* pentium 64 bits? */ | |
517 #elif defined(__x86_64) /* }{ */ | |
518 | |
519 #define LUA_IEEE754TRICK | |
520 #define LUA_IEEEENDIAN 0 | |
521 | |
522 #elif defined(__POWERPC__) || defined(__ppc__) /* }{ */ | |
523 | |
524 #define LUA_IEEE754TRICK | |
525 #define LUA_IEEEENDIAN 1 | |
526 | |
527 #else /* }{ */ | |
528 | |
529 /* assume IEEE754 and a 32-bit integer type */ | |
530 #define LUA_IEEE754TRICK | |
531 | |
532 #endif /* } */ | |
533 | |
534 #endif /* } */ | |
535 | |
536 /* }================================================================== */ | |
537 | |
538 | |
539 | |
540 | |
541 /* =================================================================== */ | |
542 | |
543 /* | |
544 ** Local configuration. You can use this space to add your redefinitions | |
545 ** without modifying the main part of the file. | |
546 */ | |
547 | |
548 | |
549 | |
550 #endif | |
551 |