This commit is contained in:
Dmitry Boulytchev 2018-11-22 17:02:08 +03:00
parent ef8ea21216
commit 23eb95ae33
4 changed files with 6 additions and 5 deletions

View file

@ -33,7 +33,7 @@ with show
(* The type for the stack machine program *)
type prg = insn list
let print_prg p = List.iter (fun i -> Printf.printf "%s\n\!" (show(insn) i)) p
let print_prg p = List.iter (fun i -> Printf.printf "%s\n" (show(insn) i)) p
(* The type for the stack machine configuration: control stack, stack and configuration from statement
interpreter