swrup/mte
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

add binary_formats.ml

Browse source
This commit is contained in:
swrup 2025-10-06 23:56:10 +02:00
parent b7b28af6fe
commit 86be1c51a5
4 changed files with 126 additions and 24 deletions
Download patch file Download diff file Expand all files Collapse all files

4
include/gen_taler_signatures.ml
View file

@ -42,7 +42,9 @@ let () =
let l = parse Data.content in
assert (List.length l = 74);
let pp ppf { name; value } = Fmt.pf ppf "let %s = %d@." name value in
let pp ppf { name; value } =
Fmt.pf ppf "let %s : int32 = %d_l@." name value
in
Fmt.pr "%a" (Fmt.list pp) l;
()