** Calls the 'close' function from a file handle. The 'volatile' avoids ** a bug in some versions of the Clang compiler (e.g., clang 3.0 for ** 32 bits). */
| 212 | ** 32 bits). |
| 213 | */ |
| 214 | static int aux_close (lua_State *L) { |
| 215 | LStream *p = tolstream(L); |
| 216 | volatile lua_CFunction cf = p->closef; |
| 217 | p->closef = NULL; /* mark stream as closed */ |
| 218 | return (*cf)(L); /* close it */ |
| 219 | } |
| 220 | |
| 221 | |
| 222 | static int f_close (lua_State *L) { |
no outgoing calls
no test coverage detected