Windows SEH fix

[factor.git] / vm / os-genunix.c

diff --git a/vm/os-genunix.c b/vm/os-genunix.c
index ac0811c605a3b0f6970f66221fdead16c6257054..1703515d8204c284d48032412097c7f00fd20243 100644 (file)
--- a/vm/os-genunix.c
+++ b/vm/os-genunix.c
@@ -1,8 +1,13 @@
 #include "factor.h"
 
-void platform_run(void)
+void run(void)
 {
-       run_toplevel();
+       interpreter();
+}
+
+void run_toplevel(void)
+{
+       run();
 }
 
 const char *default_image_path(void)