9 lines
162 B
OCaml
9 lines
162 B
OCaml
|
open Ir3
|
||
|
|
|
||
|
|
(* Also try SRC.factorial *)
|
||
|
|
let _ =
|
||
|
|
let prog = SRC.factorial in
|
||
|
|
let ir = Compile.compile prog in
|
||
|
|
let s = IR.pp_program ir in
|
||
|
|
print_endline s
|