aboutsummaryrefslogtreecommitdiff
path: root/lvm.c
diff options
context:
space:
mode:
Diffstat (limited to 'lvm.c')
-rw-r--r--lvm.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/lvm.c b/lvm.c
index d6befc1a..56f90acf 100644
--- a/lvm.c
+++ b/lvm.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: lvm.c,v 1.43 1999/02/02 19:41:17 roberto Exp roberto $ 2** $Id: lvm.c,v 1.44 1999/02/04 16:36:16 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*/
@@ -317,7 +317,7 @@ StkId luaV_execute (Closure *cl, TProtoFunc *tf, StkId base) {
317 struct Stack *S = &L->stack; /* to optimize */ 317 struct Stack *S = &L->stack; /* to optimize */
318 register Byte *pc = tf->code; 318 register Byte *pc = tf->code;
319 TObject *consts = tf->consts; 319 TObject *consts = tf->consts;
320 if (lua_callhook) 320 if (L->callhook)
321 luaD_callHook(base, tf, 0); 321 luaD_callHook(base, tf, 0);
322 luaD_checkstack((*pc++)+EXTRA_STACK); 322 luaD_checkstack((*pc++)+EXTRA_STACK);
323 if (*pc < ZEROVARARG) 323 if (*pc < ZEROVARARG)
@@ -335,7 +335,7 @@ StkId luaV_execute (Closure *cl, TProtoFunc *tf, StkId base) {
335 S->top = S->stack + base; 335 S->top = S->stack + base;
336 /* goes through */ 336 /* goes through */
337 case RETCODE: 337 case RETCODE:
338 if (lua_callhook) 338 if (L->callhook)
339 luaD_callHook(base, NULL, 1); 339 luaD_callHook(base, NULL, 1);
340 return base + (aux ? 0 : *pc); 340 return base + (aux ? 0 : *pc);
341 341
@@ -615,7 +615,7 @@ StkId luaV_execute (Closure *cl, TProtoFunc *tf, StkId base) {
615 (S->stack+base-1)->ttype = LUA_T_LINE; 615 (S->stack+base-1)->ttype = LUA_T_LINE;
616 } 616 }
617 (S->stack+base-1)->value.i = aux; 617 (S->stack+base-1)->value.i = aux;
618 if (lua_linehook) 618 if (L->linehook)
619 luaD_lineHook(aux); 619 luaD_lineHook(aux);
620 break; 620 break;
621 621