urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-19 16:51:42 +03:00
Code Issues Packages Projects Releases Wiki Activity

test: wip full-run test

Browse Source
This commit is contained in:
Jōshin 2022-02-08 08:44:55 -06:00
parent 776604bf74
commit 34fd7f5adf
No known key found for this signature in database
GPG Key ID: A8BE5A9A521639D0
1 changed files with 24 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
pkg/arvo/tests/sys/vane/khan.hoon
View File

@ -63,6 +63,8 @@
~& >>> [exp+%spider-start act+p.cage.r.note.q.start-move] ~& >>> [exp+%spider-start act+p.cage.r.note.q.start-move]
(expect !>(|)) (expect !>(|))
=/ args =/ args
:: XX $start-args in %/app/spider/hoon
::
!< [p=(unit @ta) q=(unit @ta) r=beak s=term t=vase] !< [p=(unit @ta) q=(unit @ta) r=beak s=term t=vase]
q.cage.r.note.q.start-move q.cage.r.note.q.start-move
?. =(~ p.args) ?. =(~ p.args)
@ -84,8 +86,27 @@
:: !! :: !!
:: ++ test-khan-take-poke-fail :: ++ test-khan-take-poke-fail
:: !! :: !!
:: ++ test-khan-take-full-run ++ test-khan-take-full-run
:: !! =^ born-moves khan-gate
%- khan-call :*
khan-gate
now=~1111.1.1
scry=scry-provides-mark
call-args=[duct=~[/sup] ~ [%born ~]]
==
=^ call-moves khan-gate
%- khan-call :*
khan-gate
now=(add ~1111.1.1 ~s1)
scry=scry-provides-mark
^= call-args
:* duct=~[//khan/1/0v0] ~
%fyrd
%base %nonexistent %noun %noun ~
== ==
:: TODO take: %watch-ack, %poke-ack, %thread-done %fact, %kick
::
!!
++ khan-call ++ khan-call
|= $: khan-gate=_khan-gate |= $: khan-gate=_khan-gate
now=@da now=@da
@ -94,8 +115,7 @@
$: =duct $: =duct
dud=(unit goof) dud=(unit goof)
wrapped-task=(hobo task:khan) wrapped-task=(hobo task:khan)
== == ==
==
^- [(list move:khan-gate) _khan-gate] ^- [(list move:khan-gate) _khan-gate]
=/ khan-core =/ khan-core
(khan-gate now eny=`@uvJ`0xdead.beef scry=scry) (khan-gate now eny=`@uvJ`0xdead.beef scry=scry)