12 lines
214 B
OCaml
12 lines
214 B
OCaml
open Ast
|
|
open Ir
|
|
|
|
(* Processing state for this particular scope *)
|
|
type state =
|
|
{ parent : state option
|
|
}
|
|
|
|
let lower (func:func) : (irexpr list, unit) result =
|
|
let { name = _; body = _ } = func in
|
|
Error ()
|