feat: add run function to MoonBitVM and update tests to use it

Author: oboard

benchmark_test.mbt

@@ -16,7 +16,7 @@ test "benchmark_variable_access" (b : @bench.T) {
   let vm = MoonBitVM::new(log=false)
 
   // 设置变量
-  vm.eval("let x = 42; let y = 100; let z = x + y") |> ignore
+  vm.run("let x = 42; let y = 100; let z = x + y")
   b.bench(fn() { b.keep(vm.eval("x + y + z")) })
 }
 

moon.pkg

@@ -10,6 +10,7 @@ options(
       "exports": [
         "create",
         "eval",
+        "run",
         "eval_result_to_string",
         "code_to_ast",
         "add_extern_fn",

pkg.generated.mbti

@@ -39,6 +39,7 @@ pub(all) struct MoonBitVM {
 pub fn MoonBitVM::create(log? : Bool) -> Self
 pub fn MoonBitVM::eval(Self, String, log? : Bool) -> EvalResult
 pub fn MoonBitVM::new(log? : Bool) -> Self
+pub fn MoonBitVM::run(Self, String, log? : Bool) -> Unit
 
 // Type aliases
 

test/arithmetic.mbt

@@ -15,7 +15,7 @@ test "arithmetic_operators" {
 ///|
 test "math" {
   let vm = MoonBitVM::new()
-  ignore(vm.eval("import { \"moonbitlang/core/math\" }"))
+  vm.run("import { \"moonbitlang/core/math\" }")
   inspect(vm.eval("@math.PI"), content="3.141592653589793")
 }
 

test/async.mbt

@@ -5,20 +5,18 @@
 ///|
 test "async_run_executes_function_immediately" {
   let vm = MoonBitVM::new()
-  ignore(vm.eval("fn run_async(f : async () -> Unit noraise) = \"%async.run\""))
+  vm.run("fn run_async(f : async () -> Unit noraise) = \"%async.run\"")
   inspect(vm.eval("run_async(() => 7)"), content="7")
 }
 
 ///|
 test "async_suspend_success" {
   let vm = MoonBitVM::new()
-  ignore(
-    vm.eval(
-      (
-        #|async fn[T, E : Error] async_suspend(
-        #|  cb : ((T) -> Unit, (E) -> Unit) -> Unit,
-        #|) -> T raise E = "%async.suspend"
-      ),
+  vm.run(
+    (
+      #|async fn[T, E : Error] async_suspend(
+      #|  cb : ((T) -> Unit, (E) -> Unit) -> Unit,
+      #|) -> T raise E = "%async.suspend"
     ),
   )
   inspect(vm.eval("async_suspend((ok, _err) => ok(42))"), content="42")
@@ -27,13 +25,11 @@ test "async_suspend_success" {
 ///|
 test "async_suspend_error_branch" {
   let vm = MoonBitVM::new()
-  ignore(
-    vm.eval(
-      (
-        #|async fn[T, E : Error] async_suspend(
-        #|  cb : ((T) -> Unit, (E) -> Unit) -> Unit,
-        #|) -> T raise E = "%async.suspend"
-      ),
+  vm.run(
+    (
+      #|async fn[T, E : Error] async_suspend(
+      #|  cb : ((T) -> Unit, (E) -> Unit) -> Unit,
+      #|) -> T raise E = "%async.suspend"
     ),
   )
   inspect(
@@ -54,13 +50,11 @@ test "async_suspend_error_branch" {
 ///|
 test "async_suspend_callback_not_resolved" {
   let vm = MoonBitVM::new()
-  ignore(
-    vm.eval(
-      (
-        #|async fn[T, E : Error] async_suspend(
-        #|  cb : ((T) -> Unit, (E) -> Unit) -> Unit,
-        #|) -> T raise E = "%async.suspend"
-      ),
+  vm.run(
+    (
+      #|async fn[T, E : Error] async_suspend(
+      #|  cb : ((T) -> Unit, (E) -> Unit) -> Unit,
+      #|) -> T raise E = "%async.suspend"
     ),
   )
   assert_eq(
@@ -78,13 +72,11 @@ test "async_suspend_callback_not_resolved" {
 ///|
 test "async_suspend_first_callback_wins" {
   let vm = MoonBitVM::new()
-  ignore(
-    vm.eval(
-      (
-        #|async fn[T, E : Error] async_suspend(
-        #|  cb : ((T) -> Unit, (E) -> Unit) -> Unit,
-        #|) -> T raise E = "%async.suspend"
-      ),
+  vm.run(
+    (
+      #|async fn[T, E : Error] async_suspend(
+      #|  cb : ((T) -> Unit, (E) -> Unit) -> Unit,
+      #|) -> T raise E = "%async.suspend"
     ),
   )
   inspect(

test/attributes.mbt

@@ -1,15 +1,14 @@
 ///|
 test "alias" {
   let vm = MoonBitVM::new()
-  vm.eval(
+  vm.run(
     (
       #|#alias(number_one)
       #|fn one() -> Int { 
       #|  1 
       #|}
     ),
   )
-  |> ignore
   inspect(vm.eval("one()"), content="1")
   inspect(vm.eval("number_one()"), content="1")
 }

test/constructors.mbt

@@ -6,7 +6,7 @@
 ///|
 test "constructor_single_argument_any_match" {
   let vm = MoonBitVM::new()
-  ignore(vm.eval("import { \"moonbitlang/core/list\" }"))
+  vm.run("import { \"moonbitlang/core/list\" }")
   assert_eq(
     vm.eval("let l = @list.from_array([1, 2]); l").to_string(),
     "More(1, tail=More(2, tail=Empty))",

test/control_flow.mbt

@@ -215,7 +215,7 @@ test "raise_expressions" {
 ///|
 test "loop_expressions" {
   let vm = MoonBitVM::new()
-  ignore(vm.eval("import { \"moonbitlang/core/list\" }"))
+  vm.run("import { \"moonbitlang/core/list\" }")
   // Test loop expressions
   inspect(
     vm.eval(

test/json.mbt

@@ -11,7 +11,7 @@ test "json_value" {
 ///|
 test "json_array" {
   let vm = MoonBitVM::new()
-  vm.eval("let json_array : Json = [1, 2, 3]") |> ignore
+  vm.run("let json_array : Json = [1, 2, 3]")
   inspect(vm.eval("json_array"), content="[1,2,3]")
   assert_eq(
     vm.eval("typeof(json_array)").to_string(),
@@ -22,8 +22,7 @@ test "json_array" {
 ///|
 test "json_type" {
   let vm = MoonBitVM::new()
-  vm.eval("let json : Json = { \"a\": [\"1\", \"2\"], \"b\": [\"3\", \"4\"] }")
-  |> ignore
+  vm.run("let json : Json = { \"a\": [\"1\", \"2\"], \"b\": [\"3\", \"4\"] }")
   assert_eq(
     vm.eval("typeof(json)").to_string(),
     "@moonbitlang/core/builtin.Json",

test/list.mbt

@@ -1,7 +1,7 @@
 ///|
 test "list_methods" {
   let vm = MoonBitVM::new()
-  ignore(vm.eval("import { \"moonbitlang/core/list\" }"))
+  vm.run("import { \"moonbitlang/core/list\" }")
   assert_eq(
     vm.eval("let list = @list.from_array([1, 2, 3]); list").to_string(),
     "More(1, tail=More(2, tail=More(3, tail=Empty)))",