+ validate exchange_pub

This commit is contained in:
swrup 2026-02-27 18:37:37 +01:00
parent 49fd96927c
commit fad25f8abd
2 changed files with 17 additions and 1 deletions

View file

@ -915,6 +915,10 @@ module SignKey = struct
Signkey.{ pub; stamp_start; stamp_expire; stamp_end; master_sig } =
{ key= pub; stamp_start; stamp_expire; stamp_end; master_sig }
let to_signkey { key= pub; stamp_start; stamp_expire; stamp_end; master_sig }
=
Signkey.{ pub; stamp_start; stamp_expire; stamp_end; master_sig }
let jsont =
let make key stamp_start stamp_expire stamp_end master_sig =
{ key; stamp_start; stamp_expire; stamp_end; master_sig }