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-18 17:26:53 +01:00
parent 1e30753ba9
commit bf2abee77f
1 changed files with 5 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

11
src/signatures.ml
View file

@ -1,9 +1,7 @@
(* TODO signatures (* TODO signatures
check with taler-wallet-core/src/crypto/cryptoImplementation.js check with taler-wallet
check signed/unsigned ints check signed/unsigned ints
check endianness check endianness *)
better handling of decoding failure *)
open Hash open Hash
module Aliases = struct module Aliases = struct
@ -177,8 +175,9 @@ end = struct
type r = R.r type r = R.r
type t = EddsaSignature.t type t = EddsaSignature.t
let sign_f ~f r = f (Bin.to_string R.bin r) let to_string = Bin.to_string R.bin
let verify_f ~f t r = f t ~msg:(Bin.to_string R.bin r) let sign_f ~f r = f (to_string r)
let verify_f ~f t r = f t ~msg:(to_string r)
let jsont = EddsaSignature.jsont let jsont = EddsaSignature.jsont
let caqti : EddsaSignature.t Caqti_type.t = EddsaSignature.caqti let caqti : EddsaSignature.t Caqti_type.t = EddsaSignature.caqti
let to_octets t = EddsaSignature.to_octets t let to_octets t = EddsaSignature.to_octets t