urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-29 15:14:17 +03:00
Code Issues Packages Projects Releases Wiki Activity

dojo ???: handle threads

Browse Source
This commit is contained in:
Anton Dyudin 2020-08-13 23:40:20 +00:00 committed by root
parent d372da3829
commit dda386472c
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
pkg/arvo/app/dojo.hoon
View File

@ -503,7 +503,7 @@
:: XX needs filter
::
?: ?=({$show $3} -.mad)
(dy-rash %tan (dy-show-source q.mad) ~) :: XX separate command
(dy-rash %tan (dy-show-source q.mad) ~)
?: ?=($brev -.mad)
=. var (~(del by var) p.mad)
=< dy-amok
@ -654,6 +654,7 @@
{$sa mark}
{$as mark dy-shown}
{$do hoon dy-shown}
{$te term (list dy-shown)}
{$ge path (list dy-shown) (map term (unit dy-shown))}
{$dv path}
==
@ -664,8 +665,7 @@
=- >[-]<
=+ `{@ bil/dojo-build}`a
|- ^- dy-shown
::?- -.bil
?+ -.bil dv+/[-.bil]/todo
?- -.bil
$?($ur $dv $sa) bil
$ex ?. ?=({$cltr *} p.bil) p.bil
|- ^- hoon
@ -678,6 +678,7 @@
[^$(bil q.i.p.bil) $(p.bil t.p.bil)]
$as bil(q $(bil q.q.bil))
$do bil(q $(bil q.q.bil))
$te bil(q (turn q.bil ..$))
$ge :+ %ge q.p.p.bil
[(turn p.q.p.bil ..$) (~(run by q.q.p.bil) (lift ..$))]
==