mirror of
https://github.com/ilyakooo0/urbit.git
synced 2024-11-10 10:05:09 +03:00
fix ames tests
This commit is contained in:
parent
08e4990fea
commit
b7aa7f54c4
9
pkg/arvo/gen/aqua/pill.hoon
Normal file
9
pkg/arvo/gen/aqua/pill.hoon
Normal file
@ -0,0 +1,9 @@
|
|||||||
|
/+ pill
|
||||||
|
::
|
||||||
|
:- %say
|
||||||
|
|= $: [now=@da eny=@uvJ bec=beak]
|
||||||
|
arg=~
|
||||||
|
~
|
||||||
|
==
|
||||||
|
:- %pill
|
||||||
|
.^(pill:pill %gx /(scot %p p.bec)/aqua/(scot %da now)/pill/noun)
|
@ -1,7 +1,7 @@
|
|||||||
=> |%
|
=> |%
|
||||||
+$ src
|
+$ src
|
||||||
$% [%ship =ship ~]
|
$% [%ship =ship ~]
|
||||||
[%node url=@t ~]
|
[%app =term ~]
|
||||||
==
|
==
|
||||||
--
|
--
|
||||||
:- %say
|
:- %say
|
||||||
@ -9,6 +9,6 @@
|
|||||||
=/ =source:kale
|
=/ =source:kale
|
||||||
?- -.src
|
?- -.src
|
||||||
%ship [%& ship.src]
|
%ship [%& ship.src]
|
||||||
%node [%| ~|(%parsing-url (need (de-purl:html url.src))) *@ud *@da]
|
%app [%| term.src]
|
||||||
==
|
==
|
||||||
[%azimuth-tracker-poke %listen whos source]
|
[%azimuth-tracker-poke %listen whos source]
|
||||||
|
@ -18,7 +18,7 @@
|
|||||||
ames-gate
|
ames-gate
|
||||||
now=~1234.5.6
|
now=~1234.5.6
|
||||||
call-args=[duct type=*type %soft %init ~nul]
|
call-args=[duct type=*type %soft %init ~nul]
|
||||||
expected-moves=[[duct %pass wire %j %vein ~] [duct %pass / %j %turf ~] ~]
|
expected-moves=[[duct %pass wire %k %private-keys ~] [duct %pass / %k %turf ~] ~]
|
||||||
==
|
==
|
||||||
::
|
::
|
||||||
results1
|
results1
|
||||||
@ -56,7 +56,7 @@
|
|||||||
%: ames-take
|
%: ames-take
|
||||||
ames-gate
|
ames-gate
|
||||||
now
|
now
|
||||||
take-args=[wire duct -:!>([%j %vein vein-data]) [%j %vein vein-data]]
|
take-args=[wire duct -:!>([%k %private-keys vein-data]) [%k %private-keys vein-data]]
|
||||||
expected-moves=~
|
expected-moves=~
|
||||||
==
|
==
|
||||||
::
|
::
|
||||||
@ -67,7 +67,7 @@
|
|||||||
ames-gate
|
ames-gate
|
||||||
now
|
now
|
||||||
call-args=[duct type=*type %soft [%want ~nul /foo 1]]
|
call-args=[duct type=*type %soft [%want ~nul /foo 1]]
|
||||||
:~ [duct %pass /pubs/~nul %j %pubs ~nul]
|
:~ [duct %pass /pubs/~nul %k %public-keys (silt ~nul ~)]
|
||||||
[duct %give %send *lane:ames pact1]
|
[duct %give %send *lane:ames pact1]
|
||||||
:: XX why ~s4 ??
|
:: XX why ~s4 ??
|
||||||
::
|
::
|
||||||
|
@ -116,16 +116,34 @@
|
|||||||
'3defb87516f42ce4327820b588002aa53e52527af8d23bee4aa215fa296bdf5f'
|
'3defb87516f42ce4327820b588002aa53e52527af8d23bee4aa215fa296bdf5f'
|
||||||
'0000000000000000000000000000000000000000000000000000000000000001'
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
'0000000000000000000000000000000000000000000000000000000000000001'
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000002'
|
||||||
'"},{"id":"gal-1","jsonrpc":"2.0","result":"'
|
'"},{"id":"gal-1","jsonrpc":"2.0","result":"'
|
||||||
'0xb727e38d031162e50913b2e37a2e29d4ba457eff4f7fd4ac47dc68fcb54260d3'
|
'0xb727e38d031162e50913b2e37a2e29d4ba457eff4f7fd4ac47dc68fcb54260d3'
|
||||||
'b8bfe4789483c171f7fa359438cdcc8d268d40fe08d6c1d8b36267748d2139f8'
|
'b8bfe4789483c171f7fa359438cdcc8d268d40fe08d6c1d8b36267748d2139f8'
|
||||||
'0000000000000000000000000000000000000000000000000000000000000001'
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
'0000000000000000000000000000000000000000000000000000000000000001'
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000003'
|
||||||
'"},{"id":"gal-2","jsonrpc":"2.0","result":"'
|
'"},{"id":"gal-2","jsonrpc":"2.0","result":"'
|
||||||
'0x0000000000000000000000000000000000000000000000000000000000000000'
|
'0x0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
'0000000000000000000000000000000000000000000000000000000000000000'
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
'0000000000000000000000000000000000000000000000000000000000000000'
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
'0000000000000000000000000000000000000000000000000000000000000000'
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000000'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000001'
|
||||||
|
'0000000000000000000000000000000000000000000000000000000000000004'
|
||||||
'"}]'
|
'"}]'
|
||||||
==
|
==
|
||||||
=/ kyz
|
=/ kyz
|
||||||
@ -139,8 +157,8 @@
|
|||||||
823.313.739.767.009.446.819.531.923.255.637.798.148.055.143.938.146
|
823.313.739.767.009.446.819.531.923.255.637.798.148.055.143.938.146
|
||||||
%+ expect-eq
|
%+ expect-eq
|
||||||
!> :- ~
|
!> :- ~
|
||||||
%- ~(gas by *(map ship [=life =pass]))
|
%- ~(gas by *(map ship [=rift =life =pass]))
|
||||||
[[~zod 1 zod.kyz] [~nec 1 nec.kyz] [~bud 0 'b'] ~]
|
[[~zod 2 1 zod.kyz] [~nec 3 1 nec.kyz] [~bud 4 1 'b'] ~]
|
||||||
!> (czar:take:dawn oct)
|
!> (czar:take:dawn oct)
|
||||||
::
|
::
|
||||||
++ test-take-point
|
++ test-take-point
|
||||||
|
Loading…
Reference in New Issue
Block a user