test: get make everything compile

This commit is contained in:
Philip Monk 2020-12-08 17:57:41 -08:00
parent 16dbe95fcd
commit 4f776a6f5e
No known key found for this signature in database
GPG Key ID: B66E1F02604E44EC
6 changed files with 8 additions and 9 deletions

View File

@ -4,8 +4,7 @@
:: ::
:: eg: |claz-invites ~marzod 1 10 %/example-invites/txt :: eg: |claz-invites ~marzod 1 10 %/example-invites/txt
:: ::
/+ keygen /+ keygen, *ethereum
=, ethereum
:: ::
:- %say :- %say
|= $: [now=@da eny=@uvJ =beak] |= $: [now=@da eny=@uvJ =beak]
@ -37,5 +36,5 @@
;: weld ;: weld
(scow %p who) "," (scow %p who) ","
(slag 1 (scow %q ticket)) "," (slag 1 (scow %q ticket)) ","
(address-to-hex:ethereum owner) (address-to-hex owner)
== ==

View File

@ -1,7 +1,7 @@
:: Create a private key-file :: Create a private key-file
:: ::
/- *sole /- *sole
/+ *generators /+ *generators, ethereum
:: ::
:- %ask :- %ask
|= $: [now=@da eny=@uvJ bec=beak] |= $: [now=@da eny=@uvJ bec=beak]

View File

@ -1,5 +1,5 @@
/- asn1 /- asn1
/+ primitive-rsa, der, base64 /+ primitive-rsa, der
=* rsa primitive-rsa =* rsa primitive-rsa
:::: %/lib/pkcs :::: %/lib/pkcs
|% |%
@ -58,7 +58,7 @@
^- wain ^- wain
:: XX validate label? :: XX validate label?
:- (rap 3 ['-----BEGIN ' lab '-----' ~]) :- (rap 3 ['-----BEGIN ' lab '-----' ~])
=/ a (en:base64 len `@`der) =/ a (en:base64:mimes:html len `@`der)
|- ^- wain |- ^- wain
?~ a ?~ a
[(rap 3 ['-----END ' lab '-----' ~]) ~] [(rap 3 ['-----END ' lab '-----' ~]) ~]
@ -74,7 +74,7 @@
?. =((rap 3 ['-----BEGIN ' lab '-----' ~]) i.mep) ~ ?. =((rap 3 ['-----BEGIN ' lab '-----' ~]) i.mep) ~
?. =((rap 3 ['-----END ' lab '-----' ~]) (snag a t.mep)) ~ ?. =((rap 3 ['-----END ' lab '-----' ~]) (snag a t.mep)) ~
^- (unit [@ @]) ^- (unit [@ @])
(de:base64 (rap 3 (scag a t.mep))) (de:base64:mimes:html (rap 3 (scag a t.mep)))
-- --
:: |pkcs1: RSA asymmetric cryptography (rfc3447) :: |pkcs1: RSA asymmetric cryptography (rfc3447)
:: ::

View File

@ -1,3 +1,4 @@
/+ azimuth
:: ::
|_ upd=update:azimuth |_ upd=update:azimuth
:: ::

View File

@ -1,7 +1,7 @@
:: list of ethereum transactions :: list of ethereum transactions
:: ::
/+ *ethereum
=, format =, format
=, ethereum
=, rpc =, rpc
=, mimes:html =, mimes:html
:: ::

View File

@ -3,7 +3,6 @@
:: ::
/? 310 /? 310
/- sole /- sole
/+ base64
!: !:
:: ::
:::: ::::