1
0
mirror of https://github.com/janet-lang/janet synced 2025-10-30 15:13:03 +00:00

Fix startup environment.

This commit is contained in:
Calvin Rose
2019-10-29 18:47:54 -05:00
parent 2541806dc1
commit 427b2638e0
3 changed files with 6 additions and 1 deletions

View File

@@ -88,7 +88,9 @@ int main(int argc, char **argv) {
Janet mainfun, out;
janet_resolve(env, janet_csymbol("cli-main"), &mainfun);
Janet mainargs[1] = { janet_wrap_array(args) };
status = janet_pcall(janet_unwrap_function(mainfun), 1, mainargs, &out, NULL);
JanetFiber *fiber = janet_fiber(janet_unwrap_function(mainfun), 64, 1, mainargs);
fiber->env = env;
status = janet_continue(fiber, janet_wrap_nil(), &out);
/* Deinitialize vm */
janet_deinit();