blob: 90d4f2498001a857c198d03b0fc5cb072ec813b2 (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
|
let main () =
let digest = Relational_engine.Interop.Sha256.compute_hash (Bytes.of_string "sakura") in
print_endline digest
let () =
(* let response = *)
(* Relational_engine.Relation.write_and_retrieve() *)
(* in match response with *)
(* | Ok response -> print_endline response *)
(* | Error err -> print_endline err; *)
main ()
|