diff options
| -rw-r--r-- | ldump.c | 35 | ||||
| -rw-r--r-- | lundump.c | 37 |
2 files changed, 35 insertions, 37 deletions
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: ldump.c,v 2.38 2017/06/27 11:35:31 roberto Exp roberto $ | 2 | ** $Id: ldump.c,v 2.39 2017/06/27 14:21:12 roberto Exp roberto $ |
| 3 | ** save precompiled Lua chunks | 3 | ** save precompiled Lua chunks |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -113,23 +113,22 @@ static void DumpConstants (const Proto *f, DumpState *D) { | |||
| 113 | const TValue *o = &f->k[i]; | 113 | const TValue *o = &f->k[i]; |
| 114 | DumpByte(ttype(o), D); | 114 | DumpByte(ttype(o), D); |
| 115 | switch (ttype(o)) { | 115 | switch (ttype(o)) { |
| 116 | case LUA_TNIL: | 116 | case LUA_TNIL: |
| 117 | break; | 117 | break; |
| 118 | case LUA_TBOOLEAN: | 118 | case LUA_TBOOLEAN: |
| 119 | DumpByte(bvalue(o), D); | 119 | DumpByte(bvalue(o), D); |
| 120 | break; | 120 | break; |
| 121 | case LUA_TNUMFLT: | 121 | case LUA_TNUMFLT: |
| 122 | DumpNumber(fltvalue(o), D); | 122 | DumpNumber(fltvalue(o), D); |
| 123 | break; | 123 | break; |
| 124 | case LUA_TNUMINT: | 124 | case LUA_TNUMINT: |
| 125 | DumpInteger(ivalue(o), D); | 125 | DumpInteger(ivalue(o), D); |
| 126 | break; | 126 | break; |
| 127 | case LUA_TSHRSTR: | 127 | case LUA_TSHRSTR: |
| 128 | case LUA_TLNGSTR: | 128 | case LUA_TLNGSTR: |
| 129 | DumpString(tsvalue(o), D); | 129 | DumpString(tsvalue(o), D); |
| 130 | break; | 130 | break; |
| 131 | default: | 131 | default: lua_assert(0); |
| 132 | lua_assert(0); | ||
| 133 | } | 132 | } |
| 134 | } | 133 | } |
| 135 | } | 134 | } |
| @@ -1,5 +1,5 @@ | |||
| 1 | /* | 1 | /* |
| 2 | ** $Id: lundump.c,v 2.46 2017/06/27 14:21:12 roberto Exp roberto $ | 2 | ** $Id: lundump.c,v 2.47 2017/06/29 15:06:44 roberto Exp roberto $ |
| 3 | ** load precompiled Lua chunks | 3 | ** load precompiled Lua chunks |
| 4 | ** See Copyright Notice in lua.h | 4 | ** See Copyright Notice in lua.h |
| 5 | */ | 5 | */ |
| @@ -134,24 +134,23 @@ static void LoadConstants (LoadState *S, Proto *f) { | |||
| 134 | TValue *o = &f->k[i]; | 134 | TValue *o = &f->k[i]; |
| 135 | int t = LoadByte(S); | 135 | int t = LoadByte(S); |
| 136 | switch (t) { | 136 | switch (t) { |
| 137 | case LUA_TNIL: | 137 | case LUA_TNIL: |
| 138 | setnilvalue(o); | 138 | setnilvalue(o); |
| 139 | break; | 139 | break; |
| 140 | case LUA_TBOOLEAN: | 140 | case LUA_TBOOLEAN: |
| 141 | setbvalue(o, LoadByte(S)); | 141 | setbvalue(o, LoadByte(S)); |
| 142 | break; | 142 | break; |
| 143 | case LUA_TNUMFLT: | 143 | case LUA_TNUMFLT: |
| 144 | setfltvalue(o, LoadNumber(S)); | 144 | setfltvalue(o, LoadNumber(S)); |
| 145 | break; | 145 | break; |
| 146 | case LUA_TNUMINT: | 146 | case LUA_TNUMINT: |
| 147 | setivalue(o, LoadInteger(S)); | 147 | setivalue(o, LoadInteger(S)); |
| 148 | break; | 148 | break; |
| 149 | case LUA_TSHRSTR: | 149 | case LUA_TSHRSTR: |
| 150 | case LUA_TLNGSTR: | 150 | case LUA_TLNGSTR: |
| 151 | setsvalue2n(S->L, o, LoadString(S)); | 151 | setsvalue2n(S->L, o, LoadString(S)); |
| 152 | break; | 152 | break; |
| 153 | default: | 153 | default: lua_assert(0); |
| 154 | lua_assert(0); | ||
| 155 | } | 154 | } |
| 156 | } | 155 | } |
| 157 | } | 156 | } |
