| 817 | |
| 818 | |
| 819 | static void createstdfile (lua_State *L, FILE *f, const char *k, |
| 820 | const char *fname) { |
| 821 | LStream *p = newprefile(L); |
| 822 | p->f = f; |
| 823 | p->closef = &io_noclose; |
| 824 | if (k != NULL) { |
| 825 | lua_pushvalue(L, -1); |
| 826 | lua_setfield(L, LUA_REGISTRYINDEX, k); /* add file to registry */ |
| 827 | } |
| 828 | lua_setfield(L, -2, fname); /* add file to module */ |
| 829 | } |
| 830 | |
| 831 | |
| 832 | LUAMOD_API int luaopen_io (lua_State *L) { |
no test coverage detected