aboutsummaryrefslogtreecommitdiff
path: root/ldo.c
diff options
context:
space:
mode:
Diffstat (limited to '')
-rw-r--r--ldo.c8
1 files changed, 4 insertions, 4 deletions
diff --git a/ldo.c b/ldo.c
index cb7a18c7..205203dc 100644
--- a/ldo.c
+++ b/ldo.c
@@ -1,5 +1,5 @@
1/* 1/*
2** $Id: ldo.c,v 1.191 2002/08/07 19:22:39 roberto Exp roberto $ 2** $Id: ldo.c,v 1.192 2002/08/07 20:55:00 roberto Exp roberto $
3** Stack and Call structure of Lua 3** Stack and Call structure of Lua
4** See Copyright Notice in lua.h 4** See Copyright Notice in lua.h
5*/ 5*/
@@ -101,10 +101,10 @@ static void restore_stack_limit (lua_State *L) {
101 101
102static void correctstack (lua_State *L, TObject *oldstack) { 102static void correctstack (lua_State *L, TObject *oldstack) {
103 CallInfo *ci; 103 CallInfo *ci;
104 UpVal *up; 104 GCObject *up;
105 L->top = (L->top - oldstack) + L->stack; 105 L->top = (L->top - oldstack) + L->stack;
106 for (up = L->openupval; up != NULL; up = up->next) 106 for (up = L->openupval; up != NULL; up = up->gch.next)
107 up->v = (up->v - oldstack) + L->stack; 107 (&up->uv)->v = ((&up->uv)->v - oldstack) + L->stack;
108 for (ci = L->base_ci; ci <= L->ci; ci++) { 108 for (ci = L->base_ci; ci <= L->ci; ci++) {
109 ci->base = (ci->base - oldstack) + L->stack; 109 ci->base = (ci->base - oldstack) + L->stack;
110 ci->top = (ci->top - oldstack) + L->stack; 110 ci->top = (ci->top - oldstack) + L->stack;