Software /
code /
prosody
File
util-src/table.c @ 7844:316f5166eedb
mod_mam: Find out which party is the user and which is the 'with' earlier
author | Kim Alvefur <zash@zash.se> |
---|---|
date | Sat, 19 Nov 2016 18:28:28 +0100 |
parent | 7835:a809dcfd0c5b |
child | 7889:b8d694646597 |
line wrap: on
line source
#include <lua.h> #include <lauxlib.h> static int Lcreate_table(lua_State* L) { lua_createtable(L, luaL_checkinteger(L, 1), luaL_checkinteger(L, 2)); return 1; } static int Lpack(lua_State* L) { int arg; unsigned int n_args = lua_gettop(L); lua_createtable(L, n_args, 1); lua_insert(L, 1); for(arg = n_args; arg >= 1; arg--) { lua_rawseti(L, 1, arg); } lua_pushinteger(L, n_args); lua_setfield(L, -2, "n"); return 1; } int luaopen_util_table(lua_State* L) { #if (LUA_VERSION_NUM > 501) luaL_checkversion(L); #endif lua_newtable(L); lua_pushcfunction(L, Lcreate_table); lua_setfield(L, -2, "create"); lua_pushcfunction(L, Lpack); lua_setfield(L, -2, "pack"); return 1; }