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