Home
last modified time | relevance | path

Searched refs:L (Results 1 – 25 of 289) sorted by relevance

12345678910>>...12

/f-stack/app/redis-5.0.5/deps/lua/src/
H A Dlbaselib.c58 lua_pushnumber(L, lua_tonumber(L, 1)); in luaB_tonumber()
118 if (lua_isfunction(L, 1)) lua_pushvalue(L, 1); in getfunc()
164 lua_pushboolean(L, lua_rawequal(L, 1, 2)); in luaB_rawequal()
188 lua_pushinteger(L, lua_getgccount(L)); in luaB_gcinfo()
221 lua_pushstring(L, luaL_typename(L, 1)); in luaB_type()
402 lua_pushstring(L, lua_tostring(L, 1)); in luaB_tostring()
414 lua_pushfstring(L, "%s: %p", luaL_typename(L, 1), lua_topointer(L, 1)); in luaB_tostring()
547 r = auxresume(L, co, lua_gettop(L) - 1); in luaB_coresume()
563 int r = auxresume(L, co, lua_gettop(L)); in luaB_auxwrap()
578 luaL_argcheck(L, lua_isfunction(L, 1) && !lua_iscfunction(L, 1), 1, in luaB_cocreate()
[all …]
H A Dldo.c82 L->ci = L->base_ci; in resetstack()
83 L->base = L->ci->base; in resetstack()
104 G(L)->panic(L); in luaD_throw()
129 L->top = (L->top - oldstack) + L->stack; in correctstack()
137 L->base = (L->base - oldstack) + L->stack; in correctstack()
156 L->ci = (L->ci - oldci) + L->base_ci; in luaD_reallocCI()
157 L->end_ci = L->base_ci + L->size_ci - 1; in luaD_reallocCI()
261 ((L->ci == L->end_ci) ? growCI(L) : \
405 luaV_execute(L, cast_int(L->ci - L->base_ci)); in resume()
411 setsvalue2s(L, L->top, luaS_new(L, msg)); in resume_error()
[all …]
H A Dlapi.c41 #define api_checknelems(L, n) api_check(L, (n) <= (L->top - L->base)) argument
45 #define api_incr_top(L) {api_check(L, L->top < L->ci->top); L->top++;} argument
52 api_check(L, idx <= L->ci->top - L->base); in index2adr()
57 api_check(L, idx != 0 && -idx <= L->top - L->base); in index2adr()
90 setobj2s(L, L->top, o); in luaA_pushobject()
167 api_check(L, idx <= L->stack_last - L->base); in lua_settop()
173 api_check(L, -(idx+1) <= (L->top - L->base)); in lua_settop()
221 luaC_barrier(L, curr_func(L), L->top - 1); in lua_replace()
230 setobj2s(L, L->top, index2adr(L, idx)); in lua_pushvalue()
521 setthvalue(L, L->top, L); in lua_pushthread()
[all …]
H A Dltablib.c19 #define aux_getn(L,n) (luaL_checktype(L, n, LUA_TTABLE), luaL_getn(L, n)) argument
24 int n = aux_getn(L, 1); in foreachi()
30 lua_call(L, 2, 1); in foreachi()
47 lua_call(L, 2, 1); in foreach()
73 lua_pushinteger(L, aux_getn(L, 1)); in getn()
81 luaL_setn(L, 1, luaL_checkint(L, 2)); in setn()
129 lua_pushnil(L); in tremove()
151 last = luaL_opt(L, luaL_checkint, 4, luaL_getn(L, 1)); in tconcat()
186 lua_pop(L, 1); in sort_comp()
226 while (lua_rawgeti(L, 1, ++i), sort_comp(L, -1, -2)) { in auxsort()
[all …]
H A Dliolib.c37 lua_pushnil(L); in pushresult()
50 luaL_argerror(L, arg, lua_tostring(L, -1)); in fileerror()
54 #define tofilep(L) ((FILE **)luaL_checkudata(L, 1, LUA_FILEHANDLE)) argument
99 lua_pushnil(L); in io_noclose()
130 return (lua_tocfunction(L, -1))(L); in aux_close()
260 aux_lines(L, lua_gettop(L), 1); in io_lines()
382 return g_read(L, getiofile(L, IO_INPUT), 1); in io_read()
387 return g_read(L, tofile(L), 2); in f_read()
433 return g_write(L, getiofile(L, IO_OUTPUT), 1); in io_write()
438 return g_write(L, tofile(L), 2); in f_write()
[all …]
H A Dlmathlib.c27 lua_pushnumber(L, fabs(luaL_checknumber(L, 1))); in math_abs()
32 lua_pushnumber(L, sin(luaL_checknumber(L, 1))); in math_sin()
37 lua_pushnumber(L, sinh(luaL_checknumber(L, 1))); in math_sinh()
42 lua_pushnumber(L, cos(luaL_checknumber(L, 1))); in math_cos()
47 lua_pushnumber(L, cosh(luaL_checknumber(L, 1))); in math_cosh()
52 lua_pushnumber(L, tan(luaL_checknumber(L, 1))); in math_tan()
57 lua_pushnumber(L, tanh(luaL_checknumber(L, 1))); in math_tanh()
77 lua_pushnumber(L, atan2(luaL_checknumber(L, 1), luaL_checknumber(L, 2))); in math_atan2()
92 lua_pushnumber(L, fmod(luaL_checknumber(L, 1), luaL_checknumber(L, 2))); in math_fmod()
110 lua_pushnumber(L, pow(luaL_checknumber(L, 1), luaL_checknumber(L, 2))); in math_pow()
[all …]
H A Dldblib.c29 luaL_checkany(L, 1); in db_getmetatable()
41 lua_settop(L, 2); in db_setmetatable()
42 lua_pushboolean(L, lua_setmetatable(L, 1)); in db_setmetatable()
49 lua_getfenv(L, 1); in db_getfenv()
56 lua_settop(L, 2); in db_setfenv()
83 return L; in getthread()
89 if (L == L1) { in treatstackoption()
184 name = get ? lua_getupvalue(L, 1, n) : lua_setupvalue(L, 1, n); in auxupvalue()
212 lua_pushlightuserdata(L, L); in hookf()
368 lua_concat(L, lua_gettop(L) - arg); in db_errorfb()
[all …]
H A Dloadlib.c106 luaL_gsub(L, lua_tostring(L, -1), LUA_EXECDIR, buff); in setprogdir()
269 lua_pop(L, 1); in ll_register()
316 lua_pushnil(L); in ll_loadlib()
376 lua_tostring(L, 1), filename, lua_tostring(L, -1)); in loaderror()
422 filename = findfile(L, lua_tostring(L, -1), "cpath"); in loader_Croot()
515 lua_pop(L, 1); in setfenv()
560 lua_pop(L, 1); in ll_module()
562 lua_pop(L, 1); in ll_module()
566 setfenv(L); in ll_module()
604 setprogdir(L); in setpath()
[all …]
H A Dlauxlib.c69 luaL_typerror(L, narg, lua_typename(L, tag)); in tag_error()
116 lua_pop(L, 1); in luaL_newmetatable()
312 getsizes(L); in luaL_setn()
412 lua_State *L = B->L; in adjuststack() local
455 lua_State *L = B->L; in luaL_addvalue() local
473 B->L = L; in luaL_buffinit()
531 (void)L; in getF()
581 status = lua_load(L, getF, &lf, lua_tostring(L, -1)); in luaL_loadfile()
601 (void)L; in getS()
649 if (L) lua_atpanic(L, &panic); in luaL_newstate()
[all …]
H A Dlstate.c73 stack_init(L, L); /* init stack */ in f_luaopen()
74 sethvalue(L, gt(L), luaH_new(L, 0, 2)); /* table of globals */ in f_luaopen()
75 sethvalue(L, registry(L), luaH_new(L, 0, 2)); /* registry */ in f_luaopen()
85 G(L) = g; in preinit_state()
96 L->nCcalls = L->baseCcalls = 0; in preinit_state()
98 L->base_ci = L->ci = NULL; in preinit_state()
111 luaM_freearray(L, G(L)->strt.hash, G(L)->strt.size, TString *); in close_state()
113 freestack(L, L); in close_state()
206 L->ci = L->base_ci; in lua_close()
207 L->base = L->top = L->ci->base; in lua_close()
[all …]
H A Dlua.c70 lua_pop(L, 1); in report()
81 lua_pop(L, 1); in traceback()
86 lua_pop(L, 2); in traceback()
135 int status = luaL_loadfile(L, name) || docall(L, 0, 1); in dofile()
149 return report(L, docall(L, 1, 1)); in dolibrary()
202 status = luaL_loadbuffer(L, lua_tostring(L, 1), lua_strlen(L, 1), "=stdin"); in loadline()
226 if (lua_pcall(L, lua_gettop(L)-1, 0, 0) != 0) in dotty()
345 globalL = L; in pmain()
365 dotty(L); in pmain()
369 dotty(L); in pmain()
[all …]
H A Dloslib.c26 lua_pushboolean(L, 1); in os_pushresult()
30 lua_pushnil(L); in os_pushresult()
32 lua_pushinteger(L, en); in os_pushresult()
39 lua_pushinteger(L, system(luaL_optstring(L, 1, NULL))); in os_execute()
69 lua_pushstring(L, getenv(luaL_checkstring(L, 1))); /* if NULL push nil */ in os_getenv()
103 res = lua_isnil(L, -1) ? -1 : lua_toboolean(L, -1); in getboolfield()
104 lua_pop(L, 1); in getboolfield()
119 lua_pop(L, 1); in getfield()
135 lua_pushnil(L); in os_date()
188 lua_pushnil(L); in os_time()
[all …]
H A Dlua.h254 #define lua_pop(L,n) lua_settop(L, -(n)-1) argument
256 #define lua_newtable(L) lua_createtable(L, 0, 0) argument
258 #define lua_register(L,n,f) (lua_pushcfunction(L, (f)), lua_setglobal(L, (n))) argument
260 #define lua_pushcfunction(L,f) lua_pushcclosure(L, (f), 0) argument
262 #define lua_strlen(L,i) lua_objlen(L, (i)) argument
265 #define lua_istable(L,n) (lua_type(L, (n)) == LUA_TTABLE) argument
267 #define lua_isnil(L,n) (lua_type(L, (n)) == LUA_TNIL) argument
270 #define lua_isnone(L,n) (lua_type(L, (n)) == LUA_TNONE) argument
271 #define lua_isnoneornil(L, n) (lua_type(L, (n)) <= 0) argument
279 #define lua_tostring(L,i) lua_tolstring(L, (i), NULL) argument
[all …]
H A Dlauxlib.h22 #define luaL_getn(L,i) ((int)lua_objlen(L, i)) argument
102 #define luaL_checkstring(L,n) (luaL_checklstring(L, (n), NULL)) argument
104 #define luaL_checkint(L,n) ((int)luaL_checkinteger(L, (n))) argument
105 #define luaL_optint(L,n,d) ((int)luaL_optinteger(L, (n), (d))) argument
106 #define luaL_checklong(L,n) ((long)luaL_checkinteger(L, (n))) argument
107 #define luaL_optlong(L,n,d) ((long)luaL_optinteger(L, (n), (d))) argument
109 #define luaL_typename(L,i) lua_typename(L, lua_type(L,(i))) argument
112 (luaL_loadfile(L, fn) || lua_pcall(L, 0, LUA_MULTRET, 0))
115 (luaL_loadstring(L, s) || lua_pcall(L, 0, LUA_MULTRET, 0))
119 #define luaL_opt(L,f,n,d) (lua_isnoneornil(L,(n)) ? (d) : f(L,(n))) argument
[all …]
H A Dlua_cmsgpack.c35 #define lua_pushunsigned(L, n) lua_pushnumber(L, n) argument
37 #define lua_pushunsigned(L, n) lua_pushinteger(L, n) argument
405 lua_pushnil(L); in mp_encode_lua_table_as_map()
413 lua_pushnil(L); in mp_encode_lua_table_as_map()
438 lua_pushnil(L); in table_is_an_array()
447 if (!lua_isinteger(L,-1) || (n = lua_tointeger(L, -1)) <= 0) in table_is_an_array()
505 lua_pop(L,1); in mp_encode_lua_type()
555 lua_newtable(L); in mp_decode_to_lua_array()
567 lua_newtable(L); in mp_decode_to_lua_hash()
856 lua_pop(L, lua_gettop(L)-1); in mp_unpack_one()
[all …]
H A Dlvm.c54 setsvalue2s(L, obj, luaS_new(L, s)); in luaV_tostring()
83 setobj2s(L, L->top, f); /* push function */ in callTMres()
88 luaD_call(L, L->top - 3, 1); in callTMres()
91 setobjs2s(L, res, L->top); in callTMres()
104 luaD_call(L, L->top - 4, 0); in callTM()
198 callTMres(L, L->top, tm1, p1, p2); in call_orderTM()
403 lua_assert(base == L->base && L->base == L->ci->base); in luaV_execute()
404 lua_assert(base <= L->top && L->top <= L->stack + L->stacksize); in luaV_execute()
648 if (b) L->top = L->ci->top; in luaV_execute()
688 L->top = L->ci->top; in luaV_execute()
[all …]
/f-stack/freebsd/contrib/openzfs/module/lua/
H A Dlapi.c234 setobj2s(L, L->top, index2addr(L, idx)); in lua_pushvalue()
298 setobjs2s(L, L->top, L->top - 1); in lua_arith()
592 setthvalue(L, L->top, L); in lua_pushthread()
610 setsvalue2s(L, L->top++, luaS_new(L, var)); in lua_getglobal()
620 luaV_gettable(L, t, L->top - 1, L->top - 1); in lua_gettable()
629 setsvalue2s(L, L->top, luaS_new(L, k)); in lua_getfield()
631 luaV_gettable(L, t, L->top - 1, L->top - 1); in lua_getfield()
737 setsvalue2s(L, L->top++, luaS_new(L, var)); in lua_setglobal()
749 luaV_settable(L, t, L->top - 2, L->top - 1); in lua_settable()
760 setsvalue2s(L, L->top++, luaS_new(L, k)); in lua_setfield()
[all …]
H A Dltablib.c18 #define aux_getn(L,n) (luaL_checktype(L, n, LUA_TTABLE), luaL_len(L, n)) argument
77 lua_pushnil(L); in tremove()
99 last = luaL_opt(L, luaL_checkint, 4, luaL_len(L, 1)); in tconcat()
140 e = luaL_opt(L, luaL_checkint, 3, luaL_len(L, 1)); in unpack()
177 lua_pop(L, 1); in sort_comp()
193 lua_pop(L, 2); in auxsort()
199 set2(L, i, l); in auxsort()
212 set2(L, i, u-1); in auxsort()
217 while (lua_rawgeti(L, 1, ++i), sort_comp(L, -1, -2)) { in auxsort()
222 while (lua_rawgeti(L, 1, --j), sort_comp(L, -3, -1)) { in auxsort()
[all …]
H A Dlbaselib.c73 lua_settop(L, 1); in luaB_error()
86 lua_pushnil(L); in luaB_getmetatable()
101 lua_settop(L, 2); in luaB_setmetatable()
110 lua_pushboolean(L, lua_rawequal(L, 1, 2)); in luaB_rawequal()
119 lua_pushinteger(L, lua_rawlen(L, 1)); in luaB_rawlen()
127 lua_settop(L, 2); in luaB_rawget()
128 lua_rawget(L, 1); in luaB_rawget()
136 lua_settop(L, 3); in luaB_rawset()
137 lua_rawset(L, 1); in luaB_rawset()
173 lua_pushstring(L, luaL_typename(L, 1)); in luaB_type()
[all …]
H A Dlauxlib.c84 lua_pushfstring(L, "function " LUA_QS, lua_tostring(L, -1)); in pushfuncname()
132 lua_concat(L, lua_gettop(L) - top); in luaL_traceback()
135 lua_concat(L, lua_gettop(L) - top); in luaL_traceback()
173 typeerror(L, narg, lua_typename(L, tag)); in tag_error()
236 lua_pop(L, 1); in luaL_newmetatable()
398 lua_State *L = B->L; in luaL_prepbuffsize() local
432 lua_State *L = B->L; in luaL_pushresult() local
446 lua_State *L = B->L; in luaL_addvalue() local
457 B->L = L; in luaL_buffinit()
607 lua_pushfstring(L, "%s: %p", luaL_typename(L, idx), in luaL_tolstring()
[all …]
H A Dldo.c215 L->top = (L->top - oldstack) + L->stack; in correctstack()
235 lua_assert(L->stack_last - L->stack == L->stacksize - EXTRA_STACK); in luaD_reallocstack()
236 luaM_reallocvector(L, L->stack, L->stacksize, newsize, TValue); in luaD_reallocstack()
308 L->top = restorestack(L, top); in luaD_hook()
360 #define next_ci(L) (L->ci = (L->ci->next ? L->ci->next : luaE_extendCI(L))) argument
392 luaD_poscall(L, L->top - n); in luaD_precall()
504 luaD_poscall(L, L->top - n); in finishCcall()
562 setsvalue2s(L, L->top, luaS_new(L, msg)); /* push error message */ in resume_error()
628 L->ci->top = L->top; in lua_resume()
648 if (L != G(L)->mainthread) in lua_yieldk()
[all …]
H A Dlcorolib.c28 lua_xmove(L, co, narg); in auxresume()
51 r = auxresume(L, co, lua_gettop(L) - 1); in luaB_coresume()
53 lua_pushboolean(L, 0); in luaB_coresume()
54 lua_insert(L, -2); in luaB_coresume()
67 int r = auxresume(L, co, lua_gettop(L)); in luaB_auxwrap()
71 lua_insert(L, -2); in luaB_auxwrap()
72 lua_concat(L, 2); in luaB_auxwrap()
83 NL = lua_newthread(L); in luaB_cocreate()
91 luaB_cocreate(L); in luaB_cowrap()
98 return lua_yield(L, lua_gettop(L)); in luaB_yield()
[all …]
H A Dlstate.c153 L->ci = &L->base_ci; /* free the entire 'ci' list */ in freestack()
155 luaM_freearray(L, L->stack, L->stacksize); /* free stack array */ in freestack()
169 setthvalue(L, &mt, L); in init_registry()
172 sethvalue(L, &mt, luaH_new(L)); in init_registry()
183 stack_init(L, L); /* init stack */ in f_luaopen()
202 G(L) = g; in preinit_state()
214 L->nny = 1; in preinit_state()
227 luaM_freearray(L, G(L)->strt.hash, G(L)->strt.size); in close_state()
240 setthvalue(L, L->top, L1); in lua_newthread()
309 L = NULL; in lua_newstate()
[all …]
/f-stack/freebsd/contrib/openzfs/include/sys/lua/
H A Dlua.h253 #define lua_call(L,n,r) lua_callk(L, (n), (r), 0, NULL) argument
273 #define lua_yield(L,n) lua_yieldk(L, (n), 0, NULL) argument
319 #define lua_tonumber(L,i) lua_tonumberx(L,i,NULL) argument
320 #define lua_tointeger(L,i) lua_tointegerx(L,i,NULL) argument
321 #define lua_tounsigned(L,i) lua_tounsignedx(L,i,NULL) argument
323 #define lua_pop(L,n) lua_settop(L, -(n)-1) argument
325 #define lua_newtable(L) lua_createtable(L, 0, 0) argument
327 #define lua_register(L,n,f) (lua_pushcfunction(L, (f)), lua_setglobal(L, (n))) argument
334 #define lua_isnil(L,n) (lua_type(L, (n)) == LUA_TNIL) argument
338 #define lua_isnoneornil(L, n) (lua_type(L, (n)) <= 0) argument
[all …]
H A Dlauxlib.h28 #define luaL_checkversion(L) luaL_checkversion_(L, LUA_VERSION_NUM) argument
99 #define luaL_newlib(L,l) (luaL_newlibtable(L,l), luaL_setfuncs(L,l,0)) argument
105 #define luaL_checkint(L,n) ((int)luaL_checkinteger(L, (n))) argument
106 #define luaL_optint(L,n,d) ((int)luaL_optinteger(L, (n), (d))) argument
107 #define luaL_checklong(L,n) ((long)luaL_checkinteger(L, (n))) argument
110 #define luaL_typename(L,i) lua_typename(L, lua_type(L,(i))) argument
113 (luaL_loadfile(L, fn) || lua_pcall(L, 0, LUA_MULTRET, 0))
116 (luaL_loadstring(L, s) || lua_pcall(L, 0, LUA_MULTRET, 0))
120 #define luaL_opt(L,f,n,d) (lua_isnoneornil(L,(n)) ? (d) : f(L,(n))) argument
135 lua_State *L; member
[all …]

12345678910>>...12