diff options
Diffstat (limited to 'lundump.c')
-rw-r--r-- | lundump.c | 6 |
1 files changed, 3 insertions, 3 deletions
@@ -120,10 +120,10 @@ static TString *loadStringN (LoadState *S, Proto *p) { | |||
120 | } | 120 | } |
121 | else { /* long string */ | 121 | else { /* long string */ |
122 | ts = luaS_createlngstrobj(L, size); /* create string */ | 122 | ts = luaS_createlngstrobj(L, size); /* create string */ |
123 | setsvalue2s(L, L->top, ts); /* anchor it ('loadVector' can GC) */ | 123 | setsvalue2s(L, L->top.p, ts); /* anchor it ('loadVector' can GC) */ |
124 | luaD_inctop(L); | 124 | luaD_inctop(L); |
125 | loadVector(S, getstr(ts), size); /* load directly in final place */ | 125 | loadVector(S, getstr(ts), size); /* load directly in final place */ |
126 | L->top--; /* pop string */ | 126 | L->top.p--; /* pop string */ |
127 | } | 127 | } |
128 | luaC_objbarrier(L, p, ts); | 128 | luaC_objbarrier(L, p, ts); |
129 | return ts; | 129 | return ts; |
@@ -321,7 +321,7 @@ LClosure *luaU_undump(lua_State *L, ZIO *Z, const char *name) { | |||
321 | S.Z = Z; | 321 | S.Z = Z; |
322 | checkHeader(&S); | 322 | checkHeader(&S); |
323 | cl = luaF_newLclosure(L, loadByte(&S)); | 323 | cl = luaF_newLclosure(L, loadByte(&S)); |
324 | setclLvalue2s(L, L->top, cl); | 324 | setclLvalue2s(L, L->top.p, cl); |
325 | luaD_inctop(L); | 325 | luaD_inctop(L); |
326 | cl->p = luaF_newproto(L); | 326 | cl->p = luaF_newproto(L); |
327 | luaC_objbarrier(L, cl, cl->p); | 327 | luaC_objbarrier(L, cl, cl->p); |