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

~

Browse source
This commit is contained in:
swrup 2026-02-23 07:24:40 +01:00
parent af355249fc
commit 72b0c3012a
7 changed files with 72 additions and 76 deletions
Download patch file Download diff file Expand all files Collapse all files

4
src/pg_type.ml
View file

@ -43,7 +43,7 @@ include struct
let planchets_hash = HashPlanchetsP.caqti
end
let signkey_data =
let signkey =
let master_sig = Signatures.ExchangeSigningKeyValidity.caqti in
custom
~encode:(fun
@ -53,7 +53,7 @@ let signkey_data =
Ok { pub; stamp_start; stamp_expire; stamp_end; master_sig })
(t5 eddsa_pub time time time master_sig)
let denom_data =
let denom =
let master_sig = Signatures.DenominationKeyValidity.caqti in
custom
~encode:(fun