gh-mirror/mikepaul-LuaJIT
1
0
Fork 0
mirror of https://github.com/LuaJIT/LuaJIT.git synced 2025-02-07 23:24:09 +00:00
Code Issues Actions Packages Projects Releases Wiki Activity

Support os.exit(status|true|false [,close]) (from Lua 5.2).

Browse Source
This commit is contained in:
Mike Pall 2010-11-22 22:39:06 +01:00
parent 367ff0cdaa
commit 7338456796
1 changed files with 9 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

11
src/lib_os.c
View File

@ -92,8 +92,15 @@ LJLIB_CF(os_getenv)
LJLIB_CF(os_exit) LJLIB_CF(os_exit)
{ {
exit(lj_lib_optint(L, 1, EXIT_SUCCESS)); int status;
return 0; /* to avoid warnings */ if (L->base < L->top && tvisbool(L->base))
status = boolV(L->base) ? EXIT_SUCCESS : EXIT_FAILURE;
else
status = lj_lib_optint(L, 1, EXIT_SUCCESS);
if (L->base+1 < L->top && tvistruecond(L->base+1))
lua_close(L);
exit(status);
return 0; /* Unreachable. */
} }
LJLIB_CF(os_clock) LJLIB_CF(os_clock)