Windows SEH fix

[factor.git] / vm / factor.c

diff --git a/vm/factor.c b/vm/factor.c
index 1eaff445953134ba304e8ed10d36e9fff631531c..d2e7eaa561b9db894fac823877127dde709f088c 100644 (file)
--- a/vm/factor.c
+++ b/vm/factor.c
@@ -92,9 +92,9 @@ int main(int argc, char** argv)
 
        userenv[ARGS_ENV] = tag_object(args);
 
-       platform_run();
+       run_toplevel();
 
-       critical_error("run() returned due to empty callstack",0);
+       critical_error("run_toplevel() returned due to empty callstack",0);
 
        return 0;
 }