diff options
| -rw-r--r-- | ltests.c | 4 |
1 files changed, 2 insertions, 2 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ltests.c,v 1.4 2000/01/13 16:30:47 roberto Exp roberto $ | 2 | ** $Id: ltests.c,v 1.5 2000/01/19 12:00:45 roberto Exp roberto $ |
| 3 | ** Internal Module for Debugging of the Lua Implementation | 3 | ** Internal Module for Debugging of the Lua Implementation |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -182,7 +182,7 @@ static void testC (lua_State *L) { | |||
| 182 | lua_pushobject(L, reg[getreg(L, &pc)]); | 182 | lua_pushobject(L, reg[getreg(L, &pc)]); |
| 183 | } | 183 | } |
| 184 | else if EQ("call") { | 184 | else if EQ("call") { |
| 185 | lua_call(L, getname(&pc)); | 185 | if (lua_call(L, getname(&pc))) lua_error(L, NULL); |
| 186 | } | 186 | } |
| 187 | else if EQ("gettable") { | 187 | else if EQ("gettable") { |
| 188 | reg[getreg(L, &pc)] = lua_gettable(L); | 188 | reg[getreg(L, &pc)] = lua_gettable(L); |
