1 files changed, 2 insertions, 2 deletions
diff --git a/lcode.c b/lcode.c
index e3420ac1..491adb10 100644
--- a/lcode.c
+++ b/lcode.c
@@ -1,5 +1,5 @@
 /*
-** $Id: lcode.c,v 1.111 2002/08/21 18:56:33 roberto Exp roberto $
+** $Id: lcode.c,v 1.112 2002/10/16 20:40:58 roberto Exp roberto $
 ** Code generator for Lua
 ** See Copyright Notice in lua.h
 */
@@ -214,7 +214,7 @@ static int addk (FuncState *fs, TObject *k, TObject *v) {
    Proto *f = fs->f;
    luaM_growvector(fs->L, f->k, fs->nk, f->sizek, TObject,
                    MAXARG_Bx, "constant table overflow");
-    setobj(&f->k[fs->nk], v);
+    setobj2n(&f->k[fs->nk], v);
    setnvalue(luaH_set(fs->L, fs->h, k), fs->nk);
    return fs->nk++;
  }

diff --git a/lcode.c b/lcode.c index e3420ac1..491adb10 100644 --- a/lcode.c +++ b/lcode.c
@@ -1,5 +1,5 @@
1	/*	1	/*
2	** $Id: lcode.c,v 1.111 2002/08/21 18:56:33 roberto Exp roberto $	2	** $Id: lcode.c,v 1.112 2002/10/16 20:40:58 roberto Exp roberto $
3	** Code generator for Lua	3	** Code generator for Lua
4	** See Copyright Notice in lua.h	4	** See Copyright Notice in lua.h
5	*/	5	*/
@@ -214,7 +214,7 @@ static int addk (FuncState fs, TObject k, TObject *v) {
214	Proto *f = fs->f;	214	Proto *f = fs->f;
215	luaM_growvector(fs->L, f->k, fs->nk, f->sizek, TObject,	215	luaM_growvector(fs->L, f->k, fs->nk, f->sizek, TObject,
216	MAXARG_Bx, "constant table overflow");	216	MAXARG_Bx, "constant table overflow");
217	setobj(&f->k[fs->nk], v);	217	setobj2n(&f->k[fs->nk], v);
218	setnvalue(luaH_set(fs->L, fs->h, k), fs->nk);	218	setnvalue(luaH_set(fs->L, fs->h, k), fs->nk);
219	return fs->nk++;	219	return fs->nk++;
220	}	220	}