2024-01-29 11:42:22 +01:00
|
|
|
(load "ed25519.l")
|
|
|
|
|
|
|
|
|
|
(setq SK (range 0 63))
|
2024-01-29 12:00:06 +01:00
|
|
|
(for N 1000
|
|
|
|
|
(println 'N N)
|
2024-01-29 11:42:22 +01:00
|
|
|
(setq PK (publickey (head 32 SK)))
|
2024-01-29 12:20:41 +01:00
|
|
|
(setq SK (signature SK (head 32 SK) PK)) )
|
2024-01-29 11:42:22 +01:00
|
|
|
(println (L2hex SK))
|
|
|
|
|
(msg 'ok)
|
|
|
|
|
(bye)
|
|
|
|
|
|
