akkartik
/
teliva
1
1
Fork 0
Code Issues Pull Requests Releases Activity

https://www.lua.org/pil/28.3.html 

a = array.new(1000)
for i=1,1000 do
  a:set(i, 1/i)
  end
print(a:get(10))  -- 0.1
This commit is contained in:
Kartik K. Agaram 2021-11-05 09:17:54 -07:00
parent b4d86665b8
commit 37b05c2957
1 changed files with 13 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
src/lua.c
View File

@ -436,8 +436,12 @@ static int getsize (lua_State *L) {
}
static const struct luaL_Reg arraylib[] = {
static const struct luaL_Reg arraylib_functions [] = {
{"new", newarray},
{NULL, NULL}
};
static const struct luaL_Reg array_methods [] = {
{"set", setarray},
{"get", getarray},
{"size", getsize},
@ -454,7 +458,14 @@ int main (int argc, char **argv) {
return EXIT_FAILURE;
}
luaL_newmetatable(L, "meta.array");
luaL_register(L, "array", arraylib);
/* stack: metatable */
lua_pushstring(L, "__index");
/* stack: metatable "__index" */
lua_pushvalue(L, -2); /* metatable */
lua_settable(L, -3); /* metatable.__index = metatable */
/* stack: metatable */
luaL_register(L, NULL, array_methods); /* register array_methods in metatable */
luaL_register(L, "array", arraylib_functions);
//? luaL_register(L, "curses.window", curses_window_fns);
initscr();
echo();