compiler and vm: implemented add

This commit is contained in:
2026-05-17 20:38:31 +03:00
parent 47ffeb4934
commit 3668265b6f
4 changed files with 31 additions and 4 deletions
+1 -1
View File
@@ -52,7 +52,7 @@ let rec do_apply state arg_count =
| _ -> failwith "Cannot apply non-closure object"
and interpret state =
(*trace state; (* For debug use *)*)
(*trace state; (*For debug use only*)*)
let i = state.i in
state.i <- i + 1;
(match state.instrs.(i) with