aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorRoberto Ierusalimschy <roberto@inf.puc-rio.br>2003-02-13 14:07:57 -0200
committerRoberto Ierusalimschy <roberto@inf.puc-rio.br>2003-02-13 14:07:57 -0200
commite75a6ae9eee8f990b6c06c533b7b3a2afba6e0f2 (patch)
treed577f5e496f16c0f7f489fdf4dede345aac27568
parent2866fb2dd0412b8ff1b605722c547f2548716ad3 (diff)
downloadlua-e75a6ae9eee8f990b6c06c533b7b3a2afba6e0f2.tar.gz
lua-e75a6ae9eee8f990b6c06c533b7b3a2afba6e0f2.tar.bz2
lua-e75a6ae9eee8f990b6c06c533b7b3a2afba6e0f2.zip
`defaultmeta' is always empty, but registry needs some space for
names and numbers (references)
-rw-r--r--lstate.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/lstate.c b/lstate.c
index a71a8abe..c35da871 100644
--- a/lstate.c
+++ b/lstate.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lstate.c,v 1.118 2002/12/19 13:21:08 roberto Exp roberto $ 2** $Id: lstate.c,v 1.119 2003/02/10 17:32:50 roberto Exp roberto $
3** Global State 3** Global State
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -111,10 +111,10 @@ static void f_luaopen (lua_State *L, void *ud) {
111 stack_init(L, L); /* init stack */ 111 stack_init(L, L); /* init stack */
112 /* create default meta table with a dummy table, and then close the loop */ 112 /* create default meta table with a dummy table, and then close the loop */
113 defaultmeta(L)->tt = LUA_TTABLE; 113 defaultmeta(L)->tt = LUA_TTABLE;
114 sethvalue(defaultmeta(L), luaH_new(L, 0, 4)); 114 sethvalue(defaultmeta(L), luaH_new(L, 0, 0));
115 hvalue(defaultmeta(L))->metatable = hvalue(defaultmeta(L)); 115 hvalue(defaultmeta(L))->metatable = hvalue(defaultmeta(L));
116 sethvalue(gt(L), luaH_new(L, 0, 4)); /* table of globals */ 116 sethvalue(gt(L), luaH_new(L, 0, 4)); /* table of globals */
117 sethvalue(registry(L), luaH_new(L, 0, 0)); /* registry */ 117 sethvalue(registry(L), luaH_new(L, 4, 4)); /* registry */
118 luaS_resize(L, MINSTRTABSIZE); /* initial size of string table */ 118 luaS_resize(L, MINSTRTABSIZE); /* initial size of string table */
119 luaT_init(L); 119 luaT_init(L);
120 luaX_init(L); 120 luaX_init(L);