10 lines
178 B
OCaml
10 lines
178 B
OCaml
|
open Mirage
|
||
|
|
|
||
|
|
let main =
|
||
|
|
foreign
|
||
|
|
~packages:[package "duration"; package "lwt_react"]
|
||
|
|
"Unikernel.Hello" (time @-> job)
|
||
|
|
|
||
|
|
let () =
|
||
|
|
register "hello" [main $ default_time]
|