| 1012 | |
| 1013 | #ifdef _LUAC |
| 1014 | LUA_API int lua_dump (lua_State *L, lua_Writer writer, void *data, int strip) { |
| 1015 | int status; |
| 1016 | TValue *o; |
| 1017 | lua_lock(L); |
| 1018 | api_checknelems(L, 1); |
| 1019 | o = L->top - 1; |
| 1020 | if (isLfunction(o)) |
| 1021 | status = luaU_dump(L, getproto(o), writer, data, strip); |
| 1022 | else |
| 1023 | status = 1; |
| 1024 | lua_unlock(L); |
| 1025 | return status; |
| 1026 | } |
| 1027 | #endif // end _LUAC |
| 1028 | |
| 1029 |