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

split modules in library/executable

Browse source
This commit is contained in:
swrup 2026-03-20 23:08:55 +01:00 • committed by Swrup
parent 87f06339c8
commit 176c7cfa2b
4 changed files with 67 additions and 27 deletions
Download patch file Download diff file Expand all files Collapse all files

8
src/secmod_eddsa.ml
View file

@ -24,9 +24,13 @@ module Spath = Mfat.Spath
module Cfg = struct
include Config.Exchange_secmod_eddsa
let to_spath s =
let open Fat.Spath in
match of_string s with Error (`Msg e) -> Fmt.failwith "%s" e | Ok v -> v
(* 8.3 filenames for FAT *)
let key_dir = Config.spath "/EDDSA"
let sm_key = Config.spath "/SM_EDDSA"
let key_dir = to_spath "/EDDSA"
let sm_key = to_spath "/SM_EDDSA"
end
type key = {