diff options
Diffstat (limited to '')
-rw-r--r-- | libraries/LuaJIT-1.1.7/src/lua.h | 385 |
1 files changed, 0 insertions, 385 deletions
diff --git a/libraries/LuaJIT-1.1.7/src/lua.h b/libraries/LuaJIT-1.1.7/src/lua.h deleted file mode 100644 index 7d6ee45..0000000 --- a/libraries/LuaJIT-1.1.7/src/lua.h +++ /dev/null | |||
@@ -1,385 +0,0 @@ | |||
1 | /* | ||
2 | ** $Id: lua.h,v 1.218.1.5 2008/08/06 13:30:12 roberto Exp $ | ||
3 | ** Lua - An Extensible Extension Language | ||
4 | ** Lua.org, PUC-Rio, Brazil (http://www.lua.org) | ||
5 | ** See Copyright Notice at the end of this file | ||
6 | */ | ||
7 | |||
8 | |||
9 | #ifndef lua_h | ||
10 | #define lua_h | ||
11 | |||
12 | #include <stdarg.h> | ||
13 | #include <stddef.h> | ||
14 | |||
15 | |||
16 | #include "luaconf.h" | ||
17 | |||
18 | |||
19 | #define LUA_VERSION "Lua 5.1" | ||
20 | #define LUA_RELEASE "Lua 5.1.4" | ||
21 | #define LUA_VERSION_NUM 501 | ||
22 | #define LUA_COPYRIGHT "Copyright (C) 1994-2008 Lua.org, PUC-Rio" | ||
23 | #define LUA_AUTHORS "R. Ierusalimschy, L. H. de Figueiredo & W. Celes" | ||
24 | |||
25 | |||
26 | /* mark for precompiled code (`<esc>Lua') */ | ||
27 | #define LUA_SIGNATURE "\033Lua" | ||
28 | |||
29 | /* option for multiple returns in `lua_pcall' and `lua_call' */ | ||
30 | #define LUA_MULTRET (-1) | ||
31 | |||
32 | |||
33 | /* | ||
34 | ** pseudo-indices | ||
35 | */ | ||
36 | #define LUA_REGISTRYINDEX (-10000) | ||
37 | #define LUA_ENVIRONINDEX (-10001) | ||
38 | #define LUA_GLOBALSINDEX (-10002) | ||
39 | #define lua_upvalueindex(i) (LUA_GLOBALSINDEX-(i)) | ||
40 | |||
41 | |||
42 | /* thread status; 0 is OK */ | ||
43 | #define LUA_YIELD 1 | ||
44 | #define LUA_ERRRUN 2 | ||
45 | #define LUA_ERRSYNTAX 3 | ||
46 | #define LUA_ERRMEM 4 | ||
47 | #define LUA_ERRERR 5 | ||
48 | |||
49 | |||
50 | typedef struct lua_State lua_State; | ||
51 | |||
52 | typedef int (*lua_CFunction) (lua_State *L); | ||
53 | |||
54 | |||
55 | /* | ||
56 | ** functions that read/write blocks when loading/dumping Lua chunks | ||
57 | */ | ||
58 | typedef const char * (*lua_Reader) (lua_State *L, void *ud, size_t *sz); | ||
59 | |||
60 | typedef int (*lua_Writer) (lua_State *L, const void* p, size_t sz, void* ud); | ||
61 | |||
62 | |||
63 | /* | ||
64 | ** prototype for memory-allocation functions | ||
65 | */ | ||
66 | typedef void * (*lua_Alloc) (void *ud, void *ptr, size_t osize, size_t nsize); | ||
67 | |||
68 | |||
69 | /* | ||
70 | ** basic types | ||
71 | */ | ||
72 | #define LUA_TNONE (-1) | ||
73 | |||
74 | #define LUA_TNIL 0 | ||
75 | #define LUA_TBOOLEAN 1 | ||
76 | #define LUA_TLIGHTUSERDATA 2 | ||
77 | #define LUA_TNUMBER 3 | ||
78 | #define LUA_TSTRING 4 | ||
79 | #define LUA_TTABLE 5 | ||
80 | #define LUA_TFUNCTION 6 | ||
81 | #define LUA_TUSERDATA 7 | ||
82 | #define LUA_TTHREAD 8 | ||
83 | |||
84 | |||
85 | |||
86 | /* minimum Lua stack available to a C function */ | ||
87 | #define LUA_MINSTACK 20 | ||
88 | |||
89 | |||
90 | /* | ||
91 | ** generic extra include file | ||
92 | */ | ||
93 | #if defined(LUA_USER_H) | ||
94 | #include LUA_USER_H | ||
95 | #endif | ||
96 | |||
97 | |||
98 | /* type of numbers in Lua */ | ||
99 | typedef LUA_NUMBER lua_Number; | ||
100 | |||
101 | |||
102 | /* type for integer functions */ | ||
103 | typedef LUA_INTEGER lua_Integer; | ||
104 | |||
105 | |||
106 | |||
107 | /* | ||
108 | ** state manipulation | ||
109 | */ | ||
110 | LUA_API lua_State *(lua_newstate) (lua_Alloc f, void *ud); | ||
111 | LUA_API void (lua_close) (lua_State *L); | ||
112 | LUA_API lua_State *(lua_newthread) (lua_State *L); | ||
113 | |||
114 | LUA_API lua_CFunction (lua_atpanic) (lua_State *L, lua_CFunction panicf); | ||
115 | |||
116 | |||
117 | /* | ||
118 | ** basic stack manipulation | ||
119 | */ | ||
120 | LUA_API int (lua_gettop) (lua_State *L); | ||
121 | LUA_API void (lua_settop) (lua_State *L, int idx); | ||
122 | LUA_API void (lua_pushvalue) (lua_State *L, int idx); | ||
123 | LUA_API void (lua_remove) (lua_State *L, int idx); | ||
124 | LUA_API void (lua_insert) (lua_State *L, int idx); | ||
125 | LUA_API void (lua_replace) (lua_State *L, int idx); | ||
126 | LUA_API int (lua_checkstack) (lua_State *L, int sz); | ||
127 | |||
128 | LUA_API void (lua_xmove) (lua_State *from, lua_State *to, int n); | ||
129 | |||
130 | |||
131 | /* | ||
132 | ** access functions (stack -> C) | ||
133 | */ | ||
134 | |||
135 | LUA_API int (lua_isnumber) (lua_State *L, int idx); | ||
136 | LUA_API int (lua_isstring) (lua_State *L, int idx); | ||
137 | LUA_API int (lua_iscfunction) (lua_State *L, int idx); | ||
138 | LUA_API int (lua_isuserdata) (lua_State *L, int idx); | ||
139 | LUA_API int (lua_type) (lua_State *L, int idx); | ||
140 | LUA_API const char *(lua_typename) (lua_State *L, int tp); | ||
141 | |||
142 | LUA_API int (lua_equal) (lua_State *L, int idx1, int idx2); | ||
143 | LUA_API int (lua_rawequal) (lua_State *L, int idx1, int idx2); | ||
144 | LUA_API int (lua_lessthan) (lua_State *L, int idx1, int idx2); | ||
145 | |||
146 | LUA_API lua_Number (lua_tonumber) (lua_State *L, int idx); | ||
147 | LUA_API lua_Integer (lua_tointeger) (lua_State *L, int idx); | ||
148 | LUA_API int (lua_toboolean) (lua_State *L, int idx); | ||
149 | LUA_API const char *(lua_tolstring) (lua_State *L, int idx, size_t *len); | ||
150 | LUA_API size_t (lua_objlen) (lua_State *L, int idx); | ||
151 | LUA_API lua_CFunction (lua_tocfunction) (lua_State *L, int idx); | ||
152 | LUA_API void *(lua_touserdata) (lua_State *L, int idx); | ||
153 | LUA_API lua_State *(lua_tothread) (lua_State *L, int idx); | ||
154 | LUA_API const void *(lua_topointer) (lua_State *L, int idx); | ||
155 | |||
156 | |||
157 | /* | ||
158 | ** push functions (C -> stack) | ||
159 | */ | ||
160 | LUA_API void (lua_pushnil) (lua_State *L); | ||
161 | LUA_API void (lua_pushnumber) (lua_State *L, lua_Number n); | ||
162 | LUA_API void (lua_pushinteger) (lua_State *L, lua_Integer n); | ||
163 | LUA_API void (lua_pushlstring) (lua_State *L, const char *s, size_t l); | ||
164 | LUA_API void (lua_pushstring) (lua_State *L, const char *s); | ||
165 | LUA_API const char *(lua_pushvfstring) (lua_State *L, const char *fmt, | ||
166 | va_list argp); | ||
167 | LUA_API const char *(lua_pushfstring) (lua_State *L, const char *fmt, ...); | ||
168 | LUA_API void (lua_pushcclosure) (lua_State *L, lua_CFunction fn, int n); | ||
169 | LUA_API void (lua_pushboolean) (lua_State *L, int b); | ||
170 | LUA_API void (lua_pushlightuserdata) (lua_State *L, void *p); | ||
171 | LUA_API int (lua_pushthread) (lua_State *L); | ||
172 | |||
173 | |||
174 | /* | ||
175 | ** get functions (Lua -> stack) | ||
176 | */ | ||
177 | LUA_API void (lua_gettable) (lua_State *L, int idx); | ||
178 | LUA_API void (lua_getfield) (lua_State *L, int idx, const char *k); | ||
179 | LUA_API void (lua_rawget) (lua_State *L, int idx); | ||
180 | LUA_API void (lua_rawgeti) (lua_State *L, int idx, int n); | ||
181 | LUA_API void (lua_createtable) (lua_State *L, int narr, int nrec); | ||
182 | LUA_API void *(lua_newuserdata) (lua_State *L, size_t sz); | ||
183 | LUA_API int (lua_getmetatable) (lua_State *L, int objindex); | ||
184 | LUA_API void (lua_getfenv) (lua_State *L, int idx); | ||
185 | |||
186 | |||
187 | /* | ||
188 | ** set functions (stack -> Lua) | ||
189 | */ | ||
190 | LUA_API void (lua_settable) (lua_State *L, int idx); | ||
191 | LUA_API void (lua_setfield) (lua_State *L, int idx, const char *k); | ||
192 | LUA_API void (lua_rawset) (lua_State *L, int idx); | ||
193 | LUA_API void (lua_rawseti) (lua_State *L, int idx, int n); | ||
194 | LUA_API int (lua_setmetatable) (lua_State *L, int objindex); | ||
195 | LUA_API int (lua_setfenv) (lua_State *L, int idx); | ||
196 | |||
197 | |||
198 | /* | ||
199 | ** `load' and `call' functions (load and run Lua code) | ||
200 | */ | ||
201 | LUA_API void (lua_call) (lua_State *L, int nargs, int nresults); | ||
202 | LUA_API int (lua_pcall) (lua_State *L, int nargs, int nresults, int errfunc); | ||
203 | LUA_API int (lua_cpcall) (lua_State *L, lua_CFunction func, void *ud); | ||
204 | LUA_API int (lua_load) (lua_State *L, lua_Reader reader, void *dt, | ||
205 | const char *chunkname); | ||
206 | |||
207 | LUA_API int (lua_dump) (lua_State *L, lua_Writer writer, void *data); | ||
208 | |||
209 | |||
210 | /* | ||
211 | ** coroutine functions | ||
212 | */ | ||
213 | LUA_API int (lua_yield) (lua_State *L, int nresults); | ||
214 | LUA_API int (lua_resume) (lua_State *L, int narg); | ||
215 | LUA_API int (lua_status) (lua_State *L); | ||
216 | |||
217 | /* | ||
218 | ** garbage-collection function and options | ||
219 | */ | ||
220 | |||
221 | #define LUA_GCSTOP 0 | ||
222 | #define LUA_GCRESTART 1 | ||
223 | #define LUA_GCCOLLECT 2 | ||
224 | #define LUA_GCCOUNT 3 | ||
225 | #define LUA_GCCOUNTB 4 | ||
226 | #define LUA_GCSTEP 5 | ||
227 | #define LUA_GCSETPAUSE 6 | ||
228 | #define LUA_GCSETSTEPMUL 7 | ||
229 | |||
230 | LUA_API int (lua_gc) (lua_State *L, int what, int data); | ||
231 | |||
232 | |||
233 | /* | ||
234 | ** miscellaneous functions | ||
235 | */ | ||
236 | |||
237 | LUA_API int (lua_error) (lua_State *L); | ||
238 | |||
239 | LUA_API int (lua_next) (lua_State *L, int idx); | ||
240 | |||
241 | LUA_API void (lua_concat) (lua_State *L, int n); | ||
242 | |||
243 | LUA_API lua_Alloc (lua_getallocf) (lua_State *L, void **ud); | ||
244 | LUA_API void lua_setallocf (lua_State *L, lua_Alloc f, void *ud); | ||
245 | |||
246 | |||
247 | |||
248 | /* | ||
249 | ** =============================================================== | ||
250 | ** some useful macros | ||
251 | ** =============================================================== | ||
252 | */ | ||
253 | |||
254 | #define lua_pop(L,n) lua_settop(L, -(n)-1) | ||
255 | |||
256 | #define lua_newtable(L) lua_createtable(L, 0, 0) | ||
257 | |||
258 | #define lua_register(L,n,f) (lua_pushcfunction(L, (f)), lua_setglobal(L, (n))) | ||
259 | |||
260 | #define lua_pushcfunction(L,f) lua_pushcclosure(L, (f), 0) | ||
261 | |||
262 | #define lua_strlen(L,i) lua_objlen(L, (i)) | ||
263 | |||
264 | #define lua_isfunction(L,n) (lua_type(L, (n)) == LUA_TFUNCTION) | ||
265 | #define lua_istable(L,n) (lua_type(L, (n)) == LUA_TTABLE) | ||
266 | #define lua_islightuserdata(L,n) (lua_type(L, (n)) == LUA_TLIGHTUSERDATA) | ||
267 | #define lua_isnil(L,n) (lua_type(L, (n)) == LUA_TNIL) | ||
268 | #define lua_isboolean(L,n) (lua_type(L, (n)) == LUA_TBOOLEAN) | ||
269 | #define lua_isthread(L,n) (lua_type(L, (n)) == LUA_TTHREAD) | ||
270 | #define lua_isnone(L,n) (lua_type(L, (n)) == LUA_TNONE) | ||
271 | #define lua_isnoneornil(L, n) (lua_type(L, (n)) <= 0) | ||
272 | |||
273 | #define lua_pushliteral(L, s) \ | ||
274 | lua_pushlstring(L, "" s, (sizeof(s)/sizeof(char))-1) | ||
275 | |||
276 | #define lua_setglobal(L,s) lua_setfield(L, LUA_GLOBALSINDEX, (s)) | ||
277 | #define lua_getglobal(L,s) lua_getfield(L, LUA_GLOBALSINDEX, (s)) | ||
278 | |||
279 | #define lua_tostring(L,i) lua_tolstring(L, (i), NULL) | ||
280 | |||
281 | |||
282 | |||
283 | /* | ||
284 | ** compatibility macros and functions | ||
285 | */ | ||
286 | |||
287 | #define lua_open() luaL_newstate() | ||
288 | |||
289 | #define lua_getregistry(L) lua_pushvalue(L, LUA_REGISTRYINDEX) | ||
290 | |||
291 | #define lua_getgccount(L) lua_gc(L, LUA_GCCOUNT, 0) | ||
292 | |||
293 | #define lua_Chunkreader lua_Reader | ||
294 | #define lua_Chunkwriter lua_Writer | ||
295 | |||
296 | |||
297 | |||
298 | /* | ||
299 | ** {====================================================================== | ||
300 | ** Debug API | ||
301 | ** ======================================================================= | ||
302 | */ | ||
303 | |||
304 | |||
305 | /* | ||
306 | ** Event codes | ||
307 | */ | ||
308 | #define LUA_HOOKCALL 0 | ||
309 | #define LUA_HOOKRET 1 | ||
310 | #define LUA_HOOKLINE 2 | ||
311 | #define LUA_HOOKCOUNT 3 | ||
312 | #define LUA_HOOKTAILRET 4 | ||
313 | |||
314 | |||
315 | /* | ||
316 | ** Event masks | ||
317 | */ | ||
318 | #define LUA_MASKCALL (1 << LUA_HOOKCALL) | ||
319 | #define LUA_MASKRET (1 << LUA_HOOKRET) | ||
320 | #define LUA_MASKLINE (1 << LUA_HOOKLINE) | ||
321 | #define LUA_MASKCOUNT (1 << LUA_HOOKCOUNT) | ||
322 | |||
323 | typedef struct lua_Debug lua_Debug; /* activation record */ | ||
324 | |||
325 | |||
326 | /* Functions to be called by the debuger in specific events */ | ||
327 | typedef void (*lua_Hook) (lua_State *L, lua_Debug *ar); | ||
328 | |||
329 | |||
330 | LUA_API int lua_getstack (lua_State *L, int level, lua_Debug *ar); | ||
331 | LUA_API int lua_getinfo (lua_State *L, const char *what, lua_Debug *ar); | ||
332 | LUA_API const char *lua_getlocal (lua_State *L, const lua_Debug *ar, int n); | ||
333 | LUA_API const char *lua_setlocal (lua_State *L, const lua_Debug *ar, int n); | ||
334 | LUA_API const char *lua_getupvalue (lua_State *L, int funcindex, int n); | ||
335 | LUA_API const char *lua_setupvalue (lua_State *L, int funcindex, int n); | ||
336 | |||
337 | LUA_API int lua_sethook (lua_State *L, lua_Hook func, int mask, int count); | ||
338 | LUA_API lua_Hook lua_gethook (lua_State *L); | ||
339 | LUA_API int lua_gethookmask (lua_State *L); | ||
340 | LUA_API int lua_gethookcount (lua_State *L); | ||
341 | |||
342 | |||
343 | struct lua_Debug { | ||
344 | int event; | ||
345 | const char *name; /* (n) */ | ||
346 | const char *namewhat; /* (n) `global', `local', `field', `method' */ | ||
347 | const char *what; /* (S) `Lua', `C', `main', `tail' */ | ||
348 | const char *source; /* (S) */ | ||
349 | int currentline; /* (l) */ | ||
350 | int nups; /* (u) number of upvalues */ | ||
351 | int linedefined; /* (S) */ | ||
352 | int lastlinedefined; /* (S) */ | ||
353 | char short_src[LUA_IDSIZE]; /* (S) */ | ||
354 | /* private part */ | ||
355 | int i_ci; /* active function */ | ||
356 | }; | ||
357 | |||
358 | /* }====================================================================== */ | ||
359 | |||
360 | |||
361 | /****************************************************************************** | ||
362 | * Copyright (C) 1994-2008 Lua.org, PUC-Rio. All rights reserved. | ||
363 | * | ||
364 | * Permission is hereby granted, free of charge, to any person obtaining | ||
365 | * a copy of this software and associated documentation files (the | ||
366 | * "Software"), to deal in the Software without restriction, including | ||
367 | * without limitation the rights to use, copy, modify, merge, publish, | ||
368 | * distribute, sublicense, and/or sell copies of the Software, and to | ||
369 | * permit persons to whom the Software is furnished to do so, subject to | ||
370 | * the following conditions: | ||
371 | * | ||
372 | * The above copyright notice and this permission notice shall be | ||
373 | * included in all copies or substantial portions of the Software. | ||
374 | * | ||
375 | * THE SOFTWARE IS PROVIDED "AS IS", WITHOUT WARRANTY OF ANY KIND, | ||
376 | * EXPRESS OR IMPLIED, INCLUDING BUT NOT LIMITED TO THE WARRANTIES OF | ||
377 | * MERCHANTABILITY, FITNESS FOR A PARTICULAR PURPOSE AND NONINFRINGEMENT. | ||
378 | * IN NO EVENT SHALL THE AUTHORS OR COPYRIGHT HOLDERS BE LIABLE FOR ANY | ||
379 | * CLAIM, DAMAGES OR OTHER LIABILITY, WHETHER IN AN ACTION OF CONTRACT, | ||
380 | * TORT OR OTHERWISE, ARISING FROM, OUT OF OR IN CONNECTION WITH THE | ||
381 | * SOFTWARE OR THE USE OR OTHER DEALINGS IN THE SOFTWARE. | ||
382 | ******************************************************************************/ | ||
383 | |||
384 | |||
385 | #endif | ||