1 2 3 4 5 6 7 8 9 10 11
(* WebAssembly-compatible i64 implementation *) include Ixx.Make (struct include Int64 let bitwidth = 64 let to_hex_string = Printf.sprintf "%Lx" let of_int64 i = i let to_int64 i = i end)