haxala1r/olisp
1
0
Fork 0
Code Issues Pull Requests Packages Releases Wiki Activity

Minor changes

Browse Source
This commit is contained in:
Emin Arslan
2025-11-06 23:29:28 +03:00
parent 7544e8753c
commit 6243ace80b
1 changed files with 2 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

2
lib/ast.ml
View File

@@ -60,6 +60,8 @@ let reduce init f =
| _ -> invalid_arg "cannot reduce over non-list!" | _ -> invalid_arg "cannot reduce over non-list!"
in aux init in aux init
let rec dbg_print_one v = let rec dbg_print_one v =
let pf = Printf.sprintf in let pf = Printf.sprintf in
match v with match v with