mlua_sys/lua54/
lua.rs

1//! Contains definitions from `lua.h`.
2
3use std::marker::{PhantomData, PhantomPinned};
4use std::os::raw::{c_char, c_double, c_int, c_uchar, c_ushort, c_void};
5use std::{mem, ptr};
6
7// Mark for precompiled code (`<esc>Lua`)
8pub const LUA_SIGNATURE: &[u8] = b"\x1bLua";
9
10// Option for multiple returns in 'lua_pcall' and 'lua_call'
11pub const LUA_MULTRET: c_int = -1;
12
13// Size of the Lua stack
14pub const LUAI_MAXSTACK: c_int = 1000000;
15
16// Size of a raw memory area associated with  a Lua state with very fast access.
17pub const LUA_EXTRASPACE: usize = mem::size_of::<*const ()>();
18
19//
20// Pseudo-indices
21//
22pub const LUA_REGISTRYINDEX: c_int = -LUAI_MAXSTACK - 1000;
23
24pub const fn lua_upvalueindex(i: c_int) -> c_int {
25    LUA_REGISTRYINDEX - i
26}
27
28//
29// Thread status
30//
31pub const LUA_OK: c_int = 0;
32pub const LUA_YIELD: c_int = 1;
33pub const LUA_ERRRUN: c_int = 2;
34pub const LUA_ERRSYNTAX: c_int = 3;
35pub const LUA_ERRMEM: c_int = 4;
36pub const LUA_ERRERR: c_int = 5;
37
38/// A raw Lua state associated with a thread.
39#[repr(C)]
40pub struct lua_State {
41    _data: [u8; 0],
42    _marker: PhantomData<(*mut u8, PhantomPinned)>,
43}
44
45//
46// Basic types
47//
48pub const LUA_TNONE: c_int = -1;
49
50pub const LUA_TNIL: c_int = 0;
51pub const LUA_TBOOLEAN: c_int = 1;
52pub const LUA_TLIGHTUSERDATA: c_int = 2;
53pub const LUA_TNUMBER: c_int = 3;
54pub const LUA_TSTRING: c_int = 4;
55pub const LUA_TTABLE: c_int = 5;
56pub const LUA_TFUNCTION: c_int = 6;
57pub const LUA_TUSERDATA: c_int = 7;
58pub const LUA_TTHREAD: c_int = 8;
59
60pub const LUA_NUMTYPES: c_int = 9;
61
62/// Minimum Lua stack available to a C function
63pub const LUA_MINSTACK: c_int = 20;
64
65// Predefined values in the registry
66pub const LUA_RIDX_MAINTHREAD: lua_Integer = 1;
67pub const LUA_RIDX_GLOBALS: lua_Integer = 2;
68pub const LUA_RIDX_LAST: lua_Integer = LUA_RIDX_GLOBALS;
69
70/// A Lua number, usually equivalent to `f64`
71pub type lua_Number = c_double;
72
73/// A Lua integer, usually equivalent to `i64`
74pub type lua_Integer = i64;
75
76/// A Lua unsigned integer, usually equivalent to `u64`
77pub type lua_Unsigned = u64;
78
79/// Type for continuation-function contexts
80pub type lua_KContext = isize;
81
82/// Type for native C functions that can be passed to Lua
83pub type lua_CFunction = unsafe extern "C-unwind" fn(L: *mut lua_State) -> c_int;
84
85/// Type for continuation functions
86pub type lua_KFunction =
87    unsafe extern "C-unwind" fn(L: *mut lua_State, status: c_int, ctx: lua_KContext) -> c_int;
88
89// Type for functions that read/write blocks when loading/dumping Lua chunks
90#[rustfmt::skip]
91pub type lua_Reader =
92    unsafe extern "C-unwind" fn(L: *mut lua_State, ud: *mut c_void, sz: *mut usize) -> *const c_char;
93#[rustfmt::skip]
94pub type lua_Writer =
95    unsafe extern "C-unwind" fn(L: *mut lua_State, p: *const c_void, sz: usize, ud: *mut c_void) -> c_int;
96
97/// Type for memory-allocation functions
98#[rustfmt::skip]
99pub type lua_Alloc =
100    unsafe extern "C-unwind" fn(ud: *mut c_void, ptr: *mut c_void, osize: usize, nsize: usize) -> *mut c_void;
101
102/// Type for warning functions
103pub type lua_WarnFunction = unsafe extern "C-unwind" fn(ud: *mut c_void, msg: *const c_char, tocont: c_int);
104
105#[cfg_attr(all(windows, raw_dylib), link(name = "lua54", kind = "raw-dylib"))]
106extern "C-unwind" {
107    //
108    // State manipulation
109    //
110    pub fn lua_newstate(f: lua_Alloc, ud: *mut c_void) -> *mut lua_State;
111    pub fn lua_close(L: *mut lua_State);
112    pub fn lua_newthread(L: *mut lua_State) -> *mut lua_State;
113    // Deprecated in Lua 5.4.6
114    pub fn lua_resetthread(L: *mut lua_State) -> c_int;
115    #[cfg(feature = "vendored")]
116    pub fn lua_closethread(L: *mut lua_State, from: *mut lua_State) -> c_int;
117
118    pub fn lua_atpanic(L: *mut lua_State, panicf: lua_CFunction) -> lua_CFunction;
119
120    pub fn lua_version(L: *mut lua_State) -> lua_Number;
121
122    //
123    // Basic stack manipulation
124    //
125    pub fn lua_absindex(L: *mut lua_State, idx: c_int) -> c_int;
126    pub fn lua_gettop(L: *mut lua_State) -> c_int;
127    pub fn lua_settop(L: *mut lua_State, idx: c_int);
128    pub fn lua_pushvalue(L: *mut lua_State, idx: c_int);
129    pub fn lua_rotate(L: *mut lua_State, idx: c_int, n: c_int);
130    pub fn lua_copy(L: *mut lua_State, fromidx: c_int, toidx: c_int);
131    pub fn lua_checkstack(L: *mut lua_State, sz: c_int) -> c_int;
132
133    pub fn lua_xmove(from: *mut lua_State, to: *mut lua_State, n: c_int);
134
135    //
136    // Access functions (stack -> C)
137    //
138    pub fn lua_isnumber(L: *mut lua_State, idx: c_int) -> c_int;
139    pub fn lua_isstring(L: *mut lua_State, idx: c_int) -> c_int;
140    pub fn lua_iscfunction(L: *mut lua_State, idx: c_int) -> c_int;
141    pub fn lua_isinteger(L: *mut lua_State, idx: c_int) -> c_int;
142    pub fn lua_isuserdata(L: *mut lua_State, idx: c_int) -> c_int;
143    pub fn lua_type(L: *mut lua_State, idx: c_int) -> c_int;
144    pub fn lua_typename(L: *mut lua_State, tp: c_int) -> *const c_char;
145
146    pub fn lua_tonumberx(L: *mut lua_State, idx: c_int, isnum: *mut c_int) -> lua_Number;
147    pub fn lua_tointegerx(L: *mut lua_State, idx: c_int, isnum: *mut c_int) -> lua_Integer;
148    pub fn lua_toboolean(L: *mut lua_State, idx: c_int) -> c_int;
149    pub fn lua_tolstring(L: *mut lua_State, idx: c_int, len: *mut usize) -> *const c_char;
150    #[link_name = "lua_rawlen"]
151    fn lua_rawlen_(L: *mut lua_State, idx: c_int) -> lua_Unsigned;
152    pub fn lua_tocfunction(L: *mut lua_State, idx: c_int) -> Option<lua_CFunction>;
153    pub fn lua_touserdata(L: *mut lua_State, idx: c_int) -> *mut c_void;
154    pub fn lua_tothread(L: *mut lua_State, idx: c_int) -> *mut lua_State;
155    pub fn lua_topointer(L: *mut lua_State, idx: c_int) -> *const c_void;
156}
157
158// lua_rawlen's return type changed from size_t to lua_Unsigned int in Lua 5.4.
159// This adapts the crate API to the new Lua ABI.
160#[inline(always)]
161pub unsafe fn lua_rawlen(L: *mut lua_State, idx: c_int) -> usize {
162    lua_rawlen_(L, idx) as usize
163}
164
165//
166// Comparison and arithmetic functions
167//
168pub const LUA_OPADD: c_int = 0;
169pub const LUA_OPSUB: c_int = 1;
170pub const LUA_OPMUL: c_int = 2;
171pub const LUA_OPMOD: c_int = 3;
172pub const LUA_OPPOW: c_int = 4;
173pub const LUA_OPDIV: c_int = 5;
174pub const LUA_OPIDIV: c_int = 6;
175pub const LUA_OPBAND: c_int = 7;
176pub const LUA_OPBOR: c_int = 8;
177pub const LUA_OPBXOR: c_int = 9;
178pub const LUA_OPSHL: c_int = 10;
179pub const LUA_OPSHR: c_int = 11;
180pub const LUA_OPUNM: c_int = 12;
181pub const LUA_OPBNOT: c_int = 13;
182
183pub const LUA_OPEQ: c_int = 0;
184pub const LUA_OPLT: c_int = 1;
185pub const LUA_OPLE: c_int = 2;
186
187#[cfg_attr(all(windows, raw_dylib), link(name = "lua54", kind = "raw-dylib"))]
188extern "C-unwind" {
189    pub fn lua_arith(L: *mut lua_State, op: c_int);
190    pub fn lua_rawequal(L: *mut lua_State, idx1: c_int, idx2: c_int) -> c_int;
191    pub fn lua_compare(L: *mut lua_State, idx1: c_int, idx2: c_int, op: c_int) -> c_int;
192}
193
194#[cfg_attr(all(windows, raw_dylib), link(name = "lua54", kind = "raw-dylib"))]
195extern "C-unwind" {
196    //
197    // Push functions (C -> stack)
198    //
199    pub fn lua_pushnil(L: *mut lua_State);
200    pub fn lua_pushnumber(L: *mut lua_State, n: lua_Number);
201    pub fn lua_pushinteger(L: *mut lua_State, n: lua_Integer);
202    pub fn lua_pushlstring(L: *mut lua_State, s: *const c_char, len: usize) -> *const c_char;
203    pub fn lua_pushstring(L: *mut lua_State, s: *const c_char) -> *const c_char;
204    // lua_pushvfstring
205    pub fn lua_pushfstring(L: *mut lua_State, fmt: *const c_char, ...) -> *const c_char;
206    pub fn lua_pushcclosure(L: *mut lua_State, f: lua_CFunction, n: c_int);
207    pub fn lua_pushboolean(L: *mut lua_State, b: c_int);
208    pub fn lua_pushlightuserdata(L: *mut lua_State, p: *mut c_void);
209    pub fn lua_pushthread(L: *mut lua_State) -> c_int;
210
211    //
212    // Get functions (Lua -> stack)
213    //
214    pub fn lua_getglobal(L: *mut lua_State, name: *const c_char) -> c_int;
215    pub fn lua_gettable(L: *mut lua_State, idx: c_int) -> c_int;
216    pub fn lua_getfield(L: *mut lua_State, idx: c_int, k: *const c_char) -> c_int;
217    pub fn lua_geti(L: *mut lua_State, idx: c_int, n: lua_Integer) -> c_int;
218    pub fn lua_rawget(L: *mut lua_State, idx: c_int) -> c_int;
219    pub fn lua_rawgeti(L: *mut lua_State, idx: c_int, n: lua_Integer) -> c_int;
220    pub fn lua_rawgetp(L: *mut lua_State, idx: c_int, p: *const c_void) -> c_int;
221
222    pub fn lua_createtable(L: *mut lua_State, narr: c_int, nrec: c_int);
223    pub fn lua_newuserdatauv(L: *mut lua_State, sz: usize, nuvalue: c_int) -> *mut c_void;
224    pub fn lua_getmetatable(L: *mut lua_State, objindex: c_int) -> c_int;
225    pub fn lua_getiuservalue(L: *mut lua_State, idx: c_int, n: c_int) -> c_int;
226
227    //
228    // Set functions (stack -> Lua)
229    //
230    pub fn lua_setglobal(L: *mut lua_State, name: *const c_char);
231    pub fn lua_settable(L: *mut lua_State, idx: c_int);
232    pub fn lua_setfield(L: *mut lua_State, idx: c_int, k: *const c_char);
233    pub fn lua_seti(L: *mut lua_State, idx: c_int, n: lua_Integer);
234    pub fn lua_rawset(L: *mut lua_State, idx: c_int);
235    pub fn lua_rawseti(L: *mut lua_State, idx: c_int, n: lua_Integer);
236    pub fn lua_rawsetp(L: *mut lua_State, idx: c_int, p: *const c_void);
237    pub fn lua_setmetatable(L: *mut lua_State, objindex: c_int) -> c_int;
238    pub fn lua_setiuservalue(L: *mut lua_State, idx: c_int, n: c_int) -> c_int;
239
240    //
241    // 'load' and 'call' functions (load and run Lua code)
242    //
243    pub fn lua_callk(
244        L: *mut lua_State,
245        nargs: c_int,
246        nresults: c_int,
247        ctx: lua_KContext,
248        k: Option<lua_KFunction>,
249    );
250    pub fn lua_pcallk(
251        L: *mut lua_State,
252        nargs: c_int,
253        nresults: c_int,
254        errfunc: c_int,
255        ctx: lua_KContext,
256        k: Option<lua_KFunction>,
257    ) -> c_int;
258
259    pub fn lua_load(
260        L: *mut lua_State,
261        reader: lua_Reader,
262        data: *mut c_void,
263        chunkname: *const c_char,
264        mode: *const c_char,
265    ) -> c_int;
266
267    pub fn lua_dump(L: *mut lua_State, writer: lua_Writer, data: *mut c_void, strip: c_int) -> c_int;
268}
269
270#[inline(always)]
271pub unsafe fn lua_call(L: *mut lua_State, n: c_int, r: c_int) {
272    lua_callk(L, n, r, 0, None)
273}
274
275#[inline(always)]
276pub unsafe fn lua_pcall(L: *mut lua_State, n: c_int, r: c_int, f: c_int) -> c_int {
277    lua_pcallk(L, n, r, f, 0, None)
278}
279
280#[cfg_attr(all(windows, raw_dylib), link(name = "lua54", kind = "raw-dylib"))]
281extern "C-unwind" {
282    //
283    // Coroutine functions
284    //
285    pub fn lua_yieldk(
286        L: *mut lua_State,
287        nresults: c_int,
288        ctx: lua_KContext,
289        k: Option<lua_KFunction>,
290    ) -> c_int;
291    pub fn lua_resume(L: *mut lua_State, from: *mut lua_State, narg: c_int, nres: *mut c_int) -> c_int;
292    pub fn lua_status(L: *mut lua_State) -> c_int;
293    pub fn lua_isyieldable(L: *mut lua_State) -> c_int;
294}
295
296#[inline(always)]
297pub unsafe fn lua_yield(L: *mut lua_State, n: c_int) -> c_int {
298    lua_yieldk(L, n, 0, None)
299}
300
301//
302// Warning-related functions
303//
304#[cfg_attr(all(windows, raw_dylib), link(name = "lua54", kind = "raw-dylib"))]
305extern "C-unwind" {
306    pub fn lua_setwarnf(L: *mut lua_State, f: Option<lua_WarnFunction>, ud: *mut c_void);
307    pub fn lua_warning(L: *mut lua_State, msg: *const c_char, tocont: c_int);
308}
309
310//
311// Garbage-collection function and options
312//
313pub const LUA_GCSTOP: c_int = 0;
314pub const LUA_GCRESTART: c_int = 1;
315pub const LUA_GCCOLLECT: c_int = 2;
316pub const LUA_GCCOUNT: c_int = 3;
317pub const LUA_GCCOUNTB: c_int = 4;
318pub const LUA_GCSTEP: c_int = 5;
319pub const LUA_GCSETPAUSE: c_int = 6;
320pub const LUA_GCSETSTEPMUL: c_int = 7;
321pub const LUA_GCISRUNNING: c_int = 9;
322pub const LUA_GCGEN: c_int = 10;
323pub const LUA_GCINC: c_int = 11;
324
325#[cfg_attr(all(windows, raw_dylib), link(name = "lua54", kind = "raw-dylib"))]
326extern "C-unwind" {
327    pub fn lua_gc(L: *mut lua_State, what: c_int, ...) -> c_int;
328}
329
330#[cfg_attr(all(windows, raw_dylib), link(name = "lua54", kind = "raw-dylib"))]
331extern "C-unwind" {
332    //
333    // Miscellaneous functions
334    //
335    #[link_name = "lua_error"]
336    fn lua_error_(L: *mut lua_State) -> c_int;
337    pub fn lua_next(L: *mut lua_State, idx: c_int) -> c_int;
338    pub fn lua_concat(L: *mut lua_State, n: c_int);
339    pub fn lua_len(L: *mut lua_State, idx: c_int);
340    pub fn lua_stringtonumber(L: *mut lua_State, s: *const c_char) -> usize;
341    pub fn lua_getallocf(L: *mut lua_State, ud: *mut *mut c_void) -> lua_Alloc;
342    pub fn lua_setallocf(L: *mut lua_State, f: lua_Alloc, ud: *mut c_void);
343
344    pub fn lua_toclose(L: *mut lua_State, idx: c_int);
345    pub fn lua_closeslot(L: *mut lua_State, idx: c_int);
346}
347
348// lua_error does not return but is declared to return int, and Rust translates
349// ! to void which can cause link-time errors if the platform linker is aware
350// of return types and requires they match (for example: wasm does this).
351#[inline(always)]
352pub unsafe fn lua_error(L: *mut lua_State) -> ! {
353    lua_error_(L);
354    unreachable!();
355}
356
357//
358// Some useful macros (implemented as Rust functions)
359//
360#[inline(always)]
361pub unsafe fn lua_getextraspace(L: *mut lua_State) -> *mut c_void {
362    (L as *mut c_char).sub(LUA_EXTRASPACE) as *mut c_void
363}
364
365#[inline(always)]
366pub unsafe fn lua_tonumber(L: *mut lua_State, i: c_int) -> lua_Number {
367    lua_tonumberx(L, i, ptr::null_mut())
368}
369
370#[inline(always)]
371pub unsafe fn lua_tointeger(L: *mut lua_State, i: c_int) -> lua_Integer {
372    lua_tointegerx(L, i, ptr::null_mut())
373}
374
375#[inline(always)]
376pub unsafe fn lua_pop(L: *mut lua_State, n: c_int) {
377    lua_settop(L, -n - 1)
378}
379
380#[inline(always)]
381pub unsafe fn lua_newtable(L: *mut lua_State) {
382    lua_createtable(L, 0, 0)
383}
384
385#[inline(always)]
386pub unsafe fn lua_register(L: *mut lua_State, n: *const c_char, f: lua_CFunction) {
387    lua_pushcfunction(L, f);
388    lua_setglobal(L, n)
389}
390
391#[inline(always)]
392pub unsafe fn lua_pushcfunction(L: *mut lua_State, f: lua_CFunction) {
393    lua_pushcclosure(L, f, 0)
394}
395
396#[inline(always)]
397pub unsafe fn lua_isfunction(L: *mut lua_State, n: c_int) -> c_int {
398    (lua_type(L, n) == LUA_TFUNCTION) as c_int
399}
400
401#[inline(always)]
402pub unsafe fn lua_istable(L: *mut lua_State, n: c_int) -> c_int {
403    (lua_type(L, n) == LUA_TTABLE) as c_int
404}
405
406#[inline(always)]
407pub unsafe fn lua_islightuserdata(L: *mut lua_State, n: c_int) -> c_int {
408    (lua_type(L, n) == LUA_TLIGHTUSERDATA) as c_int
409}
410
411#[inline(always)]
412pub unsafe fn lua_isnil(L: *mut lua_State, n: c_int) -> c_int {
413    (lua_type(L, n) == LUA_TNIL) as c_int
414}
415
416#[inline(always)]
417pub unsafe fn lua_isboolean(L: *mut lua_State, n: c_int) -> c_int {
418    (lua_type(L, n) == LUA_TBOOLEAN) as c_int
419}
420
421#[inline(always)]
422pub unsafe fn lua_isthread(L: *mut lua_State, n: c_int) -> c_int {
423    (lua_type(L, n) == LUA_TTHREAD) as c_int
424}
425
426#[inline(always)]
427pub unsafe fn lua_isnone(L: *mut lua_State, n: c_int) -> c_int {
428    (lua_type(L, n) == LUA_TNONE) as c_int
429}
430
431#[inline(always)]
432pub unsafe fn lua_isnoneornil(L: *mut lua_State, n: c_int) -> c_int {
433    (lua_type(L, n) <= 0) as c_int
434}
435
436#[inline(always)]
437pub unsafe fn lua_pushliteral(L: *mut lua_State, s: &'static str) -> *const c_char {
438    use std::ffi::CString;
439    let c_str = CString::new(s).unwrap();
440    lua_pushlstring(L, c_str.as_ptr(), c_str.as_bytes().len())
441}
442
443#[inline(always)]
444pub unsafe fn lua_pushglobaltable(L: *mut lua_State) -> c_int {
445    lua_rawgeti(L, LUA_REGISTRYINDEX, LUA_RIDX_GLOBALS)
446}
447
448#[inline(always)]
449pub unsafe fn lua_tolightuserdata(L: *mut lua_State, idx: c_int) -> *mut c_void {
450    if lua_islightuserdata(L, idx) != 0 {
451        return lua_touserdata(L, idx);
452    }
453    ptr::null_mut()
454}
455
456#[inline(always)]
457pub unsafe fn lua_tostring(L: *mut lua_State, i: c_int) -> *const c_char {
458    lua_tolstring(L, i, ptr::null_mut())
459}
460
461#[inline(always)]
462pub unsafe fn lua_insert(L: *mut lua_State, idx: c_int) {
463    lua_rotate(L, idx, 1)
464}
465
466#[inline(always)]
467pub unsafe fn lua_remove(L: *mut lua_State, idx: c_int) {
468    lua_rotate(L, idx, -1);
469    lua_pop(L, 1)
470}
471
472#[inline(always)]
473pub unsafe fn lua_replace(L: *mut lua_State, idx: c_int) {
474    lua_copy(L, -1, idx);
475    lua_pop(L, 1)
476}
477
478#[inline(always)]
479pub unsafe fn lua_xpush(from: *mut lua_State, to: *mut lua_State, idx: c_int) {
480    lua_pushvalue(from, idx);
481    lua_xmove(from, to, 1);
482}
483
484#[inline(always)]
485pub unsafe fn lua_newuserdata(L: *mut lua_State, sz: usize) -> *mut c_void {
486    lua_newuserdatauv(L, sz, 1)
487}
488
489#[inline(always)]
490pub unsafe fn lua_getuservalue(L: *mut lua_State, idx: c_int) -> c_int {
491    lua_getiuservalue(L, idx, 1)
492}
493
494#[inline(always)]
495pub unsafe fn lua_setuservalue(L: *mut lua_State, idx: c_int) -> c_int {
496    lua_setiuservalue(L, idx, 1)
497}
498
499//
500// Debug API
501//
502
503// Maximum size for the description of the source of a function in debug information.
504const LUA_IDSIZE: usize = 60;
505
506// Event codes
507pub const LUA_HOOKCALL: c_int = 0;
508pub const LUA_HOOKRET: c_int = 1;
509pub const LUA_HOOKLINE: c_int = 2;
510pub const LUA_HOOKCOUNT: c_int = 3;
511pub const LUA_HOOKTAILCALL: c_int = 4;
512
513// Event masks
514pub const LUA_MASKCALL: c_int = 1 << (LUA_HOOKCALL as usize);
515pub const LUA_MASKRET: c_int = 1 << (LUA_HOOKRET as usize);
516pub const LUA_MASKLINE: c_int = 1 << (LUA_HOOKLINE as usize);
517pub const LUA_MASKCOUNT: c_int = 1 << (LUA_HOOKCOUNT as usize);
518
519/// Type for functions to be called on debug events.
520pub type lua_Hook = unsafe extern "C-unwind" fn(L: *mut lua_State, ar: *mut lua_Debug);
521
522#[cfg_attr(all(windows, raw_dylib), link(name = "lua54", kind = "raw-dylib"))]
523extern "C-unwind" {
524    pub fn lua_getstack(L: *mut lua_State, level: c_int, ar: *mut lua_Debug) -> c_int;
525    pub fn lua_getinfo(L: *mut lua_State, what: *const c_char, ar: *mut lua_Debug) -> c_int;
526    pub fn lua_getlocal(L: *mut lua_State, ar: *const lua_Debug, n: c_int) -> *const c_char;
527    pub fn lua_setlocal(L: *mut lua_State, ar: *const lua_Debug, n: c_int) -> *const c_char;
528    pub fn lua_getupvalue(L: *mut lua_State, funcindex: c_int, n: c_int) -> *const c_char;
529    pub fn lua_setupvalue(L: *mut lua_State, funcindex: c_int, n: c_int) -> *const c_char;
530
531    pub fn lua_upvalueid(L: *mut lua_State, fidx: c_int, n: c_int) -> *mut c_void;
532    pub fn lua_upvaluejoin(L: *mut lua_State, fidx1: c_int, n1: c_int, fidx2: c_int, n2: c_int);
533
534    pub fn lua_sethook(L: *mut lua_State, func: Option<lua_Hook>, mask: c_int, count: c_int);
535    pub fn lua_gethook(L: *mut lua_State) -> Option<lua_Hook>;
536    pub fn lua_gethookmask(L: *mut lua_State) -> c_int;
537    pub fn lua_gethookcount(L: *mut lua_State) -> c_int;
538}
539
540#[repr(C)]
541pub struct lua_Debug {
542    pub event: c_int,
543    pub name: *const c_char,
544    pub namewhat: *const c_char,
545    pub what: *const c_char,
546    pub source: *const c_char,
547    pub srclen: usize,
548    pub currentline: c_int,
549    pub linedefined: c_int,
550    pub lastlinedefined: c_int,
551    pub nups: c_uchar,
552    pub nparams: c_uchar,
553    pub isvararg: c_char,
554    pub istailcall: c_char,
555    pub ftransfer: c_ushort,
556    pub ntransfer: c_ushort,
557    pub short_src: [c_char; LUA_IDSIZE],
558    // lua.h mentions this is for private use
559    i_ci: *mut c_void,
560}