mte/unikernel/duniverse/digestif/mirage/unikernel.ml

8 lines
248 B
OCaml
Raw Normal View History

2025-11-11 02:07:51 +01:00
module Make (Console : Mirage_console.S) = struct
let log console fmt = Format.kasprintf (Console.log console) fmt
let start console =
let hash = Digestif.SHA1.digest_string "Hello World!" in
log console "%a" Digestif.SHA1.pp hash
end