** load precompiled chunk */
| 193 | ** load precompiled chunk |
| 194 | */ |
| 195 | Proto* luaU_undump (lua_State* L, ZIO* Z, Mbuffer* buff, const char* name) |
| 196 | { |
| 197 | /* BZ -- disable precompiled chunks */ |
| 198 | luaO_pushfstring(L, "precompiled chunks are disabled"); |
| 199 | luaD_throw(L, LUA_ERRSYNTAX); |
| 200 | |
| 201 | LoadState S; |
| 202 | if (*name=='@' || *name=='=') |
| 203 | S.name=name+1; |
| 204 | else if (*name==LUA_SIGNATURE[0]) |
| 205 | S.name="binary string"; |
| 206 | else |
| 207 | S.name=name; |
| 208 | S.L=L; |
| 209 | S.Z=Z; |
| 210 | S.b=buff; |
| 211 | LoadHeader(&S); |
| 212 | return LoadFunction(&S,luaS_newliteral(L,"=?")); |
| 213 | } |
| 214 | |
| 215 | /* |
| 216 | * make header |
nothing calls this directly
no test coverage detected