| 642 | |
| 643 | |
| 644 | static void createstdfile (lua_State *L, FILE *f, const char *k, |
| 645 | const char *fname) { |
| 646 | LStream *p = newprefile(L); |
| 647 | p->f = f; |
| 648 | p->closef = &io_noclose; |
| 649 | if (k != NULL) { |
| 650 | lua_pushvalue(L, -1); |
| 651 | lua_setfield(L, LUA_REGISTRYINDEX, k); /* add file to registry */ |
| 652 | } |
| 653 | lua_setfield(L, -2, fname); /* add file to module */ |
| 654 | } |
| 655 | |
| 656 | |
| 657 | LUAMOD_API int luaopen_io (lua_State *L) { |
no test coverage detected