diff --git a/ldo.c b/ldo.c
index 81b1b708..da9207e4 100644
--- a/ldo.c
+++ b/ldo.c
@@ -1,5 +1,5 @@
 /*
-** $Id: ldo.c,v 1.45 1999/06/22 20:37:23 roberto Exp roberto $
+** $Id: ldo.c,v 1.46 1999/08/16 20:52:00 roberto Exp roberto $
 ** Stack and Call structure of Lua
 ** See Copyright Notice in lua.h
 */
@@ -190,7 +190,7 @@ void luaD_calln (int nArgs, int nResults) {
       break;
     case LUA_T_CLOSURE: {
       Closure *c = clvalue(func);
-      TObject *proto = &(c->consts[0]);
+      TObject *proto = c->consts;
       ttype(func) = LUA_T_CLMARK;
       firstResult = (ttype(proto) == LUA_T_CPROTO) ?
                        callCclosure(c, fvalue(proto), base) :