9 lines
181 B
Plaintext
9 lines
181 B
Plaintext
type storage = unit
|
|
|
|
(* Not supported yet:
|
|
let main (p:unit) storage = (fun x -> ()) ()
|
|
*)
|
|
|
|
let main (_: unit * storage) =
|
|
(fun (f: unit -> unit) -> f ()) (fun (_: unit) -> unit)
|