aboutsummaryrefslogtreecommitdiff
path: root/src/3rdParty/lua/lundump.c
diff options
context:
space:
mode:
authorLi Jin <dragon-fly@qq.com>2022-12-02 10:40:09 +0800
committerLi Jin <dragon-fly@qq.com>2022-12-02 10:40:09 +0800
commit298b18dbe852300199cc529c942a181bead5f135 (patch)
treef4b5ae89b6920fa0a12c693118f85334f19754f8 /src/3rdParty/lua/lundump.c
parenta6a65ba26a9d320611abcbfba49fa724edfb4dad (diff)
downloadyuescript-298b18dbe852300199cc529c942a181bead5f135.tar.gz
yuescript-298b18dbe852300199cc529c942a181bead5f135.tar.bz2
yuescript-298b18dbe852300199cc529c942a181bead5f135.zip
update Lua.
Diffstat (limited to 'src/3rdParty/lua/lundump.c')
-rw-r--r--src/3rdParty/lua/lundump.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/src/3rdParty/lua/lundump.c b/src/3rdParty/lua/lundump.c
index 5aa55c4..aba93f8 100644
--- a/src/3rdParty/lua/lundump.c
+++ b/src/3rdParty/lua/lundump.c
@@ -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);