| 187 | |
| 188 | |
| 189 | static int str_dump (lua_State *L) { |
| 190 | luaL_Buffer b; |
| 191 | int strip = lua_toboolean(L, 2); |
| 192 | luaL_checktype(L, 1, LUA_TFUNCTION); |
| 193 | lua_settop(L, 1); |
| 194 | luaL_buffinit(L,&b); |
| 195 | if (lua_dump(L, writer, &b, strip) != 0) |
| 196 | return luaL_error(L, "unable to dump given function"); |
| 197 | luaL_pushresult(&b); |
| 198 | return 1; |
| 199 | } |
| 200 | |
| 201 | |
| 202 |
nothing calls this directly
no test coverage detected