diff options
Diffstat (limited to 'lib/newwrap/lua')
| -rwxr-xr-x | lib/newwrap/lua/lauxlib.nim | 182 | ||||
| -rwxr-xr-x | lib/newwrap/lua/lua.nim | 48 | ||||
| -rwxr-xr-x | lib/newwrap/lua/lualib.nim | 24 |
3 files changed, 122 insertions, 132 deletions
diff --git a/lib/newwrap/lua/lauxlib.nim b/lib/newwrap/lua/lauxlib.nim index 13a473687..f96e8ee4f 100755 --- a/lib/newwrap/lua/lauxlib.nim +++ b/lib/newwrap/lua/lauxlib.nim @@ -24,89 +24,89 @@ import lua -proc lua_pushstring*(L: Plua_State, s: string) +proc pushstring*(L: PState, s: string) # compatibilty macros -proc getn*(L: Plua_State, n: int): int +proc getn*(L: PState, n: int): int # calls lua_objlen -proc setn*(L: Plua_State, t, n: int) +proc setn*(L: PState, t, n: int) # does nothing! type Treg*{.final.} = object name*: cstring - func*: lua_CFunction + func*: CFunction Preg* = ptr Treg -proc openlib*(L: Plua_State, libname: cstring, lr: Preg, nup: int){.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_openlib".} -proc register*(L: Plua_State, libname: cstring, lr: Preg){.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_register".} -proc getmetafield*(L: Plua_State, obj: int, e: cstring): int{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_getmetafield".} -proc callmeta*(L: Plua_State, obj: int, e: cstring): int{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_callmeta".} -proc typerror*(L: Plua_State, narg: int, tname: cstring): int{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_typerror".} -proc argerror*(L: Plua_State, numarg: int, extramsg: cstring): int{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_argerror".} -proc checklstring*(L: Plua_State, numArg: int, l_: Psize_t): cstring{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_checklstring".} -proc optlstring*(L: Plua_State, numArg: int, def: cstring, l_: Psize_t): cstring{. - cdecl, dynlib: LUA_LIB_NAME, importc: "luaL_optlstring".} -proc checknumber*(L: Plua_State, numArg: int): lua_Number{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_checknumber".} -proc optnumber*(L: Plua_State, nArg: int, def: lua_Number): lua_Number{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_optnumber".} -proc checkinteger*(L: Plua_State, numArg: int): lua_Integer{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_checkinteger".} -proc optinteger*(L: Plua_State, nArg: int, def: lua_Integer): lua_Integer{. - cdecl, dynlib: LUA_LIB_NAME, importc: "luaL_optinteger".} -proc checkstack*(L: Plua_State, sz: int, msg: cstring){.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_checkstack".} -proc checktype*(L: Plua_State, narg, t: int){.cdecl, dynlib: LUA_LIB_NAME, +proc openlib*(L: PState, libname: cstring, lr: Preg, nup: int){.cdecl, + dynlib: LIB_NAME, importc: "luaL_openlib".} +proc register*(L: PState, libname: cstring, lr: Preg){.cdecl, + dynlib: LIB_NAME, importc: "luaL_register".} +proc getmetafield*(L: PState, obj: int, e: cstring): int{.cdecl, + dynlib: LIB_NAME, importc: "luaL_getmetafield".} +proc callmeta*(L: PState, obj: int, e: cstring): int{.cdecl, + dynlib: LIB_NAME, importc: "luaL_callmeta".} +proc typerror*(L: PState, narg: int, tname: cstring): int{.cdecl, + dynlib: LIB_NAME, importc: "luaL_typerror".} +proc argerror*(L: PState, numarg: int, extramsg: cstring): int{.cdecl, + dynlib: LIB_NAME, importc: "luaL_argerror".} +proc checklstring*(L: PState, numArg: int, l_: Psize_t): cstring{.cdecl, + dynlib: LIB_NAME, importc: "luaL_checklstring".} +proc optlstring*(L: PState, numArg: int, def: cstring, l_: Psize_t): cstring{. + cdecl, dynlib: LIB_NAME, importc: "luaL_optlstring".} +proc checknumber*(L: PState, numArg: int): lua_Number{.cdecl, + dynlib: LIB_NAME, importc: "luaL_checknumber".} +proc optnumber*(L: PState, nArg: int, def: lua_Number): lua_Number{.cdecl, + dynlib: LIB_NAME, importc: "luaL_optnumber".} +proc checkinteger*(L: PState, numArg: int): lua_Integer{.cdecl, + dynlib: LIB_NAME, importc: "luaL_checkinteger".} +proc optinteger*(L: PState, nArg: int, def: lua_Integer): lua_Integer{. + cdecl, dynlib: LIB_NAME, importc: "luaL_optinteger".} +proc checkstack*(L: PState, sz: int, msg: cstring){.cdecl, + dynlib: LIB_NAME, importc: "luaL_checkstack".} +proc checktype*(L: PState, narg, t: int){.cdecl, dynlib: LIB_NAME, importc: "luaL_checktype".} -proc checkany*(L: Plua_State, narg: int){.cdecl, dynlib: LUA_LIB_NAME, +proc checkany*(L: PState, narg: int){.cdecl, dynlib: LIB_NAME, importc: "luaL_checkany".} -proc newmetatable*(L: Plua_State, tname: cstring): int{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_newmetatable".} -proc checkudata*(L: Plua_State, ud: int, tname: cstring): Pointer{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_checkudata".} -proc where*(L: Plua_State, lvl: int){.cdecl, dynlib: LUA_LIB_NAME, +proc newmetatable*(L: PState, tname: cstring): int{.cdecl, + dynlib: LIB_NAME, importc: "luaL_newmetatable".} +proc checkudata*(L: PState, ud: int, tname: cstring): Pointer{.cdecl, + dynlib: LIB_NAME, importc: "luaL_checkudata".} +proc where*(L: PState, lvl: int){.cdecl, dynlib: LIB_NAME, importc: "luaL_where".} -proc error*(L: Plua_State, fmt: cstring): int{.cdecl, varargs, - dynlib: LUA_LIB_NAME, importc: "luaL_error".} -proc checkoption*(L: Plua_State, narg: int, def: cstring, lst: cstringArray): int{. - cdecl, dynlib: LUA_LIB_NAME, importc: "luaL_checkoption".} -proc ref*(L: Plua_State, t: int): int{.cdecl, dynlib: LUA_LIB_NAME, +proc error*(L: PState, fmt: cstring): int{.cdecl, varargs, + dynlib: LIB_NAME, importc: "luaL_error".} +proc checkoption*(L: PState, narg: int, def: cstring, lst: cstringArray): int{. + cdecl, dynlib: LIB_NAME, importc: "luaL_checkoption".} +proc ref*(L: PState, t: int): int{.cdecl, dynlib: LIB_NAME, importc: "luaL_ref".} -proc unref*(L: Plua_State, t, theref: int){.cdecl, dynlib: LUA_LIB_NAME, +proc unref*(L: PState, t, theref: int){.cdecl, dynlib: LIB_NAME, importc: "luaL_unref".} -proc loadfile*(L: Plua_State, filename: cstring): int{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_loadfile".} -proc loadbuffer*(L: Plua_State, buff: cstring, size: size_t, name: cstring): int{. - cdecl, dynlib: LUA_LIB_NAME, importc: "luaL_loadbuffer".} -proc loadstring*(L: Plua_State, s: cstring): int{.cdecl, dynlib: LUA_LIB_NAME, +proc loadfile*(L: PState, filename: cstring): int{.cdecl, + dynlib: LIB_NAME, importc: "luaL_loadfile".} +proc loadbuffer*(L: PState, buff: cstring, size: size_t, name: cstring): int{. + cdecl, dynlib: LIB_NAME, importc: "luaL_loadbuffer".} +proc loadstring*(L: PState, s: cstring): int{.cdecl, dynlib: LIB_NAME, importc: "luaL_loadstring".} -proc newstate*(): Plua_State{.cdecl, dynlib: LUA_LIB_NAME, +proc newstate*(): PState{.cdecl, dynlib: LIB_NAME, importc: "luaL_newstate".} -proc lua_open*(): Plua_State +proc lua_open*(): PState # compatibility; moved from unit lua to lauxlib because it needs luaL_newstate # #** =============================================================== #** some useful macros #** =============================================================== # -proc argcheck*(L: Plua_State, cond: bool, numarg: int, extramsg: cstring) -proc checkstring*(L: Plua_State, n: int): cstring -proc optstring*(L: Plua_State, n: int, d: cstring): cstring -proc checkint*(L: Plua_State, n: int): int -proc checklong*(L: Plua_State, n: int): int32 -proc optint*(L: Plua_State, n: int, d: float64): int -proc optlong*(L: Plua_State, n: int, d: float64): int32 -proc typename*(L: Plua_State, i: int): cstring -proc lua_dofile*(L: Plua_State, filename: cstring): int -proc lua_dostring*(L: Plua_State, str: cstring): int -proc lua_Lgetmetatable*(L: Plua_State, tname: cstring) +proc argcheck*(L: PState, cond: bool, numarg: int, extramsg: cstring) +proc checkstring*(L: PState, n: int): cstring +proc optstring*(L: PState, n: int, d: cstring): cstring +proc checkint*(L: PState, n: int): int +proc checklong*(L: PState, n: int): int32 +proc optint*(L: PState, n: int, d: float64): int +proc optlong*(L: PState, n: int, d: float64): int32 +proc typename*(L: PState, i: int): cstring +proc lua_dofile*(L: PState, filename: cstring): int +proc lua_dostring*(L: PState, str: cstring): int +proc lua_Lgetmetatable*(L: PState, tname: cstring) # not translated: # #define luaL_opt(L,f,n,d) (lua_isnoneornil(L,(n)) ? (d) : f(L,(n))) # @@ -121,7 +121,7 @@ type Buffer*{.final.} = object p*: cstring # current position in buffer lvl*: int # number of strings in the stack (level) - L*: Plua_State + L*: PState buffer*: array[0..BUFFERSIZE - 1, Char] # warning: see note above about LUAL_BUFFERSIZE PBuffer* = ptr Buffer @@ -132,82 +132,82 @@ proc addchar*(B: PBuffer, c: Char) proc putchar*(B: PBuffer, c: Char) # warning: see note above about LUAL_BUFFERSIZE proc addsize*(B: PBuffer, n: int) -proc buffinit*(L: Plua_State, B: PBuffer){.cdecl, dynlib: LUA_LIB_NAME, +proc buffinit*(L: PState, B: PBuffer){.cdecl, dynlib: LIB_NAME, importc: "luaL_buffinit".} -proc prepbuffer*(B: PBuffer): cstring{.cdecl, dynlib: LUA_LIB_NAME, +proc prepbuffer*(B: PBuffer): cstring{.cdecl, dynlib: LIB_NAME, importc: "luaL_prepbuffer".} proc addlstring*(B: PBuffer, s: cstring, L: size_t){.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_addlstring".} -proc addstring*(B: PBuffer, s: cstring){.cdecl, dynlib: LUA_LIB_NAME, + dynlib: LIB_NAME, importc: "luaL_addlstring".} +proc addstring*(B: PBuffer, s: cstring){.cdecl, dynlib: LIB_NAME, importc: "luaL_addstring".} -proc addvalue*(B: PBuffer){.cdecl, dynlib: LUA_LIB_NAME, +proc addvalue*(B: PBuffer){.cdecl, dynlib: LIB_NAME, importc: "luaL_addvalue".} -proc pushresult*(B: PBuffer){.cdecl, dynlib: LUA_LIB_NAME, +proc pushresult*(B: PBuffer){.cdecl, dynlib: LIB_NAME, importc: "luaL_pushresult".} -proc gsub*(L: Plua_State, s, p, r: cstring): cstring{.cdecl, - dynlib: LUA_LIB_NAME, importc: "luaL_gsub".} -proc findtable*(L: Plua_State, idx: int, fname: cstring, szhint: int): cstring{. - cdecl, dynlib: LUA_LIB_NAME, importc: "luaL_findtable".} +proc gsub*(L: PState, s, p, r: cstring): cstring{.cdecl, + dynlib: LIB_NAME, importc: "luaL_gsub".} +proc findtable*(L: PState, idx: int, fname: cstring, szhint: int): cstring{. + cdecl, dynlib: LIB_NAME, importc: "luaL_findtable".} # compatibility with ref system # pre-defined references const LUA_NOREF* = - 2 LUA_REFNIL* = - 1 -proc lua_unref*(L: Plua_State, theref: int) -proc lua_getref*(L: Plua_State, theref: int) +proc lua_unref*(L: PState, theref: int) +proc lua_getref*(L: PState, theref: int) # #** Compatibility macros and functions # # implementation -proc lua_pushstring(L: Plua_State, s: string) = +proc lua_pushstring(L: PState, s: string) = lua_pushlstring(L, cstring(s), len(s)) -proc getn(L: Plua_State, n: int): int = +proc getn(L: PState, n: int): int = Result = lua_objlen(L, n) -proc setn(L: Plua_State, t, n: int) = +proc setn(L: PState, t, n: int) = # does nothing as this operation is deprecated nil -proc lua_open(): Plua_State = +proc lua_open(): PState = Result = newstate() -proc typename(L: Plua_State, i: int): cstring = +proc typename(L: PState, i: int): cstring = Result = lua_typename(L, lua_type(L, i)) -proc lua_dofile(L: Plua_State, filename: cstring): int = +proc lua_dofile(L: PState, filename: cstring): int = Result = loadfile(L, filename) if Result == 0: Result = lua_pcall(L, 0, LUA_MULTRET, 0) -proc lua_dostring(L: Plua_State, str: cstring): int = +proc lua_dostring(L: PState, str: cstring): int = Result = loadstring(L, str) if Result == 0: Result = lua_pcall(L, 0, LUA_MULTRET, 0) -proc lua_Lgetmetatable(L: Plua_State, tname: cstring) = +proc lua_Lgetmetatable(L: PState, tname: cstring) = lua_getfield(L, LUA_REGISTRYINDEX, tname) -proc argcheck(L: Plua_State, cond: bool, numarg: int, extramsg: cstring) = +proc argcheck(L: PState, cond: bool, numarg: int, extramsg: cstring) = if not cond: discard argerror(L, numarg, extramsg) -proc checkstring(L: Plua_State, n: int): cstring = +proc checkstring(L: PState, n: int): cstring = Result = checklstring(L, n, nil) -proc optstring(L: Plua_State, n: int, d: cstring): cstring = +proc optstring(L: PState, n: int, d: cstring): cstring = Result = optlstring(L, n, d, nil) -proc checkint(L: Plua_State, n: int): int = +proc checkint(L: PState, n: int): int = Result = toInt(checknumber(L, n)) -proc checklong(L: Plua_State, n: int): int32 = +proc checklong(L: PState, n: int): int32 = Result = int32(ToInt(checknumber(L, n))) -proc optint(L: Plua_State, n: int, d: float64): int = +proc optint(L: PState, n: int, d: float64): int = Result = int(ToInt(optnumber(L, n, d))) -proc optlong(L: Plua_State, n: int, d: float64): int32 = +proc optlong(L: PState, n: int, d: float64): int32 = Result = int32(ToInt(optnumber(L, n, d))) proc addchar(B: PBuffer, c: Char) = @@ -222,8 +222,8 @@ proc putchar(B: PBuffer, c: Char) = proc addsize(B: PBuffer, n: int) = B.p = cast[cstring](cast[int](B.p) + n) -proc lua_unref(L: Plua_State, theref: int) = +proc lua_unref(L: PState, theref: int) = unref(L, LUA_REGISTRYINDEX, theref) -proc lua_getref(L: Plua_State, theref: int) = +proc lua_getref(L: PState, theref: int) = lua_rawgeti(L, LUA_REGISTRYINDEX, theref) diff --git a/lib/newwrap/lua/lua.nim b/lib/newwrap/lua/lua.nim index b702e381c..449be5cda 100755 --- a/lib/newwrap/lua/lua.nim +++ b/lib/newwrap/lua/lua.nim @@ -47,9 +47,7 @@ else: const NAME* = "lua(|5.2|5.1|5.0).dll" LIB_NAME* = "lua(|5.2|5.1|5.0).dll" -type - size_t* = int - Psize_t* = ptr size_t + const VERSION* = "Lua 5.1" @@ -67,7 +65,7 @@ const proc upvalueindex*(I: int): int const # thread status; 0 is OK - YIELD_* = 1 + constYIELD* = 1 ERRRUN* = 2 ERRSYNTAX* = 3 ERRMEM* = 4 @@ -82,9 +80,9 @@ type # type - Reader* = proc (L: PState, ud: Pointer, sz: Psize_t): cstring{.cdecl.} - Writer* = proc (L: PState, p: Pointer, sz: size_t, ud: Pointer): int{.cdecl.} - Alloc* = proc (ud, theptr: Pointer, osize, nsize: size_t){.cdecl.} + Reader* = proc (L: PState, ud: Pointer, sz: ptr int): cstring{.cdecl.} + Writer* = proc (L: PState, p: Pointer, sz: int, ud: Pointer): int{.cdecl.} + Alloc* = proc (ud, theptr: Pointer, osize, nsize: int){.cdecl.} const TNONE* = - 1 @@ -129,7 +127,7 @@ proc iscfunction*(L: PState, idx: int): cint{.cdecl, dynlib: NAME, importc: "lua_iscfunction".} proc isuserdata*(L: PState, idx: int): cint{.cdecl, dynlib: NAME, importc: "lua_isuserdata".} -proc type*(L: PState, idx: int): int{.cdecl, dynlib: NAME, importc: "lua_type".} +proc luatype*(L: PState, idx: int): int{.cdecl, dynlib: NAME, importc: "lua_type".} proc typename*(L: PState, tp: int): cstring{.cdecl, dynlib: NAME, importc: "lua_typename".} proc equal*(L: PState, idx1, idx2: int): cint{.cdecl, dynlib: NAME, @@ -144,9 +142,9 @@ proc tointeger*(L: PState, idx: int): Integer{.cdecl, dynlib: NAME, importc: "lua_tointeger".} proc toboolean*(L: PState, idx: int): cint{.cdecl, dynlib: NAME, importc: "lua_toboolean".} -proc tolstring*(L: PState, idx: int, length: Psize_t): cstring{.cdecl, +proc tolstring*(L: PState, idx: int, length: ptr int): cstring{.cdecl, dynlib: NAME, importc: "lua_tolstring".} -proc objlen*(L: PState, idx: int): size_t{.cdecl, dynlib: NAME, +proc objlen*(L: PState, idx: int): int{.cdecl, dynlib: NAME, importc: "lua_objlen".} proc tocfunction*(L: PState, idx: int): CFunction{.cdecl, dynlib: NAME, importc: "lua_tocfunction".} @@ -161,7 +159,7 @@ proc pushnumber*(L: PState, n: Number){.cdecl, dynlib: NAME, importc: "lua_pushnumber".} proc pushinteger*(L: PState, n: Integer){.cdecl, dynlib: NAME, importc: "lua_pushinteger".} -proc pushlstring*(L: PState, s: cstring, l_: size_t){.cdecl, dynlib: NAME, +proc pushlstring*(L: PState, s: cstring, l_: int){.cdecl, dynlib: NAME, importc: "lua_pushlstring".} proc pushstring*(L: PState, s: cstring){.cdecl, dynlib: NAME, importc: "lua_pushstring".} @@ -185,7 +183,7 @@ proc rawgeti*(L: PState, idx, n: int){.cdecl, dynlib: NAME, importc: "lua_rawgeti".} proc createtable*(L: PState, narr, nrec: int){.cdecl, dynlib: NAME, importc: "lua_createtable".} -proc newuserdata*(L: PState, sz: size_t): Pointer{.cdecl, dynlib: NAME, +proc newuserdata*(L: PState, sz: int): Pointer{.cdecl, dynlib: NAME, importc: "lua_newuserdata".} proc getmetatable*(L: PState, objindex: int): int{.cdecl, dynlib: NAME, importc: "lua_getmetatable".} @@ -211,7 +209,7 @@ proc load*(L: PState, reader: Reader, dt: Pointer, chunkname: cstring): int{. cdecl, dynlib: NAME, importc: "lua_load".} proc dump*(L: PState, writer: Writer, data: Pointer): int{.cdecl, dynlib: NAME, importc: "lua_dump".} -proc yield*(L: PState, nresults: int): int{.cdecl, dynlib: NAME, +proc luayield*(L: PState, nresults: int): int{.cdecl, dynlib: NAME, importc: "lua_yield".} proc resume*(L: PState, narg: int): int{.cdecl, dynlib: NAME, importc: "lua_resume".} @@ -249,7 +247,7 @@ proc pop*(L: PState, n: int) proc newtable*(L: Pstate) proc register*(L: PState, n: cstring, f: CFunction) proc pushcfunction*(L: PState, f: CFunction) -proc strlen*(L: Pstate, i: int): size_t +proc strlen*(L: Pstate, i: int): int proc isfunction*(L: PState, n: int): bool proc istable*(L: PState, n: int): bool proc islightuserdata*(L: PState, n: int): bool @@ -295,7 +293,7 @@ const IDSIZE* = 60 type - Debug*{.final.} = object # activation record + TDebug*{.final.} = object # activation record event*: int name*: cstring # (n) namewhat*: cstring # (n) `global', `local', `field', `method' @@ -309,7 +307,7 @@ type # private part i_ci*: int # active function - PDebug* = ptr Debug + PDebug* = ptr TDebug Hook* = proc (L: PState, ar: PDebug){.cdecl.} # @@ -355,32 +353,32 @@ proc register(L: PState, n: cstring, f: CFunction) = proc pushcfunction(L: PState, f: CFunction) = pushcclosure(L, f, 0) -proc strlen(L: PState, i: int): size_t = +proc strlen(L: PState, i: int): int = Result = objlen(L, i) proc isfunction(L: PState, n: int): bool = - Result = type(L, n) == TFUNCTION + Result = luatype(L, n) == TFUNCTION proc istable(L: PState, n: int): bool = - Result = type(L, n) == TTABLE + Result = luatype(L, n) == TTABLE proc islightuserdata(L: PState, n: int): bool = - Result = type(L, n) == TLIGHTUSERDATA + Result = luatype(L, n) == TLIGHTUSERDATA proc isnil(L: PState, n: int): bool = - Result = type(L, n) == TNIL + Result = luatype(L, n) == TNIL proc isboolean(L: PState, n: int): bool = - Result = type(L, n) == TBOOLEAN + Result = luatype(L, n) == TBOOLEAN proc isthread(L: PState, n: int): bool = - Result = type(L, n) == TTHREAD + Result = luatype(L, n) == TTHREAD proc isnone(L: PState, n: int): bool = - Result = type(L, n) == TNONE + Result = luatype(L, n) == TNONE proc isnoneornil(L: PState, n: int): bool = - Result = type(L, n) <= 0 + Result = luatype(L, n) <= 0 proc pushliteral(L: PState, s: cstring) = pushlstring(L, s, len(s)) diff --git a/lib/newwrap/lua/lualib.nim b/lib/newwrap/lua/lualib.nim index c2c6cd97b..94f08a1f1 100755 --- a/lib/newwrap/lua/lualib.nim +++ b/lib/newwrap/lua/lualib.nim @@ -20,7 +20,7 @@ # import - + lua const COLIBNAME* = "coroutine" @@ -45,30 +45,22 @@ proc open_debug*(L: PState): cint{.cdecl, dynlib: LIB_NAME, importc: "luaopen_debug".} proc open_package*(L: PState): cint{.cdecl, dynlib: LIB_NAME, importc: "luaopen_package".} -proc L_openlibs*(L: PState){.cdecl, dynlib: LIB_NAME, importc: "luaL_openlibs".} - # compatibility code -proc baselibopen*(L: PState): Bool -proc tablibopen*(L: PState): Bool -proc iolibopen*(L: PState): Bool -proc strlibopen*(L: PState): Bool -proc mathlibopen*(L: PState): Bool -proc dblibopen*(L: PState): Bool -# implementation +proc openlibs*(L: PState){.cdecl, dynlib: LIB_NAME, importc: "luaL_openlibs".} -proc baselibopen(L: PState): Bool = +proc baselibopen*(L: PState): Bool = Result = open_base(L) != 0'i32 -proc tablibopen(L: PState): Bool = +proc tablibopen*(L: PState): Bool = Result = open_table(L) != 0'i32 -proc iolibopen(L: PState): Bool = +proc iolibopen*(L: PState): Bool = Result = open_io(L) != 0'i32 -proc strlibopen(L: PState): Bool = +proc strlibopen*(L: PState): Bool = Result = open_string(L) != 0'i32 -proc mathlibopen(L: PState): Bool = +proc mathlibopen*(L: PState): Bool = Result = open_math(L) != 0'i32 -proc dblibopen(L: PState): Bool = +proc dblibopen*(L: PState): Bool = Result = open_debug(L) != 0'i32 |