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

clay: address review comments

Browse Source
This commit is contained in:
Philip Monk 2022-05-03 19:17:39 -07:00
parent a3a2934d53
commit d59fb3a82b
1 changed files with 11 additions and 32 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

43
pkg/arvo/sys/vane/clay.hoon
View File

@ -204,7 +204,7 @@
[%tube =mars]
:: leafs
::
[%vale =path lob=(unit lobe)]
[%vale =path =lobe]
[%arch =path =(map path lobe)]
==
::
@ -923,7 +923,6 @@
:: such as /path/file/hoon, but not /path/more/file/hoon.
::
++ build-directory
=/ gain &
|= =path
^- [(map @ta vase) state]
%- soak-arch
@ -1161,12 +1160,11 @@
?+ -.mist mist
%vale
:+ %vale path.mist
?~ lob=(~(get by files) path.mist)
~
:- ~
?- -.u.lob
%& (page-to-lobe p.u.lob)
%| p.u.lob
~| %file-not-found-mist^path.mist
=/ lob (~(got by files) path.mist)
?- -.lob
%& (page-to-lobe p.lob)
%| p.lob
==
::
%arch
@ -1180,30 +1178,11 @@
==
==
::
++ soak-cage
|= [=soak nub=state]
?> ?=(%cage -.soak)
[cage.soak nub]
::
++ soak-vase
|= [=soak nub=state]
?> ?=(%vase -.soak)
[vase.soak nub]
::
++ soak-dais
|= [=soak nub=state]
?> ?=(%dais -.soak)
[dais.soak nub]
::
++ soak-tube
|= [=soak nub=state]
?> ?=(%tube -.soak)
[tube.soak nub]
::
++ soak-arch
|= [=soak nub=state]
?> ?=(%arch -.soak)
[dir.soak nub]
++ soak-cage |=([s=soak n=state] ?>(?=(%cage -.s) [cage.s n]))
++ soak-vase |=([s=soak n=state] ?>(?=(%vase -.s) [vase.s n]))
++ soak-dais |=([s=soak n=state] ?>(?=(%dais -.s) [dais.s n]))
++ soak-tube |=([s=soak n=state] ?>(?=(%tube -.s) [tube.s n]))
++ soak-arch |=([s=soak n=state] ?>(?=(%arch -.s) [dir.s n]))
::
++ gain-sprig
|= [=mist next=(trap [soak state])]