new instrs, tail-call

This commit is contained in:
2026-08-28 11:39:37 -06:00
parent c0a44c89b4
commit 9cb169f9b8
4 changed files with 96 additions and 79 deletions
+2 -2
View File
@@ -16,13 +16,13 @@ test_root = testGroup "stack machine"
[ testCase "immediate halt" do
evalsTo [ObjImm (ImmInt 3)] [stkP|
(define $start
(tail-call 0))
(return 0))
|]
, testCase "lit int" do
evalsTo [ObjImm (ImmInt 3)] [stkP|
(define $start
(push! 3)
(tail-call 1))
(return 1))
|]
-- , testCase "return constant" do
-- evalsTo [ObjImm (ImmInt 123)] [stkP|