diff options
| author | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-10-27 14:14:37 -0200 |
|---|---|---|
| committer | Roberto Ierusalimschy <roberto@inf.puc-rio.br> | 1997-10-27 14:14:37 -0200 |
| commit | 6103dca8ee311299bd438acf7fe74774821b8f07 (patch) | |
| tree | 41c9e817153affaf6154f7fec85b08e383252465 /lvm.c | |
| parent | 18cd7adac6e5745cad93fecacbe6a2ed16dd3e18 (diff) | |
| download | lua-6103dca8ee311299bd438acf7fe74774821b8f07.tar.gz lua-6103dca8ee311299bd438acf7fe74774821b8f07.tar.bz2 lua-6103dca8ee311299bd438acf7fe74774821b8f07.zip | |
small bug.
Diffstat (limited to 'lvm.c')
| -rw-r--r-- | lvm.c | 6 |
1 files changed, 3 insertions, 3 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lvm.c,v 1.11 1997/10/24 17:17:24 roberto Exp roberto $ | 2 | ** $Id: lvm.c,v 1.12 1997/10/24 18:40:29 roberto Exp roberto $ |
| 3 | ** Lua virtual machine | 3 | ** Lua virtual machine |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -277,7 +277,7 @@ StkId luaV_execute (Closure *cl, StkId base) | |||
| 277 | Byte *pc = cl->consts[0].value.tf->code; | 277 | Byte *pc = cl->consts[0].value.tf->code; |
| 278 | TObject *consts = cl->consts[0].value.tf->consts; | 278 | TObject *consts = cl->consts[0].value.tf->consts; |
| 279 | if (lua_callhook) | 279 | if (lua_callhook) |
| 280 | luaD_callHook(base, LUA_T_MARK, 0); | 280 | luaD_callHook(base, LUA_T_PROTO, 0); |
| 281 | luaD_checkstack((*pc++)+EXTRA_STACK); | 281 | luaD_checkstack((*pc++)+EXTRA_STACK); |
| 282 | while (1) { | 282 | while (1) { |
| 283 | int aux; | 283 | int aux; |
| @@ -671,7 +671,7 @@ StkId luaV_execute (Closure *cl, StkId base) | |||
| 671 | /* goes through */ | 671 | /* goes through */ |
| 672 | case RETCODE: | 672 | case RETCODE: |
| 673 | if (lua_callhook) | 673 | if (lua_callhook) |
| 674 | luaD_callHook(base, LUA_T_MARK, 1); | 674 | luaD_callHook(base, LUA_T_PROTO, 1); |
| 675 | return (base + ((aux==RETCODE) ? *pc : 0)); | 675 | return (base + ((aux==RETCODE) ? *pc : 0)); |
| 676 | 676 | ||
| 677 | case SETLINEW: | 677 | case SETLINEW: |