mirror of
https://github.com/urbit/shrub.git
synced 2024-12-01 14:42:02 +03:00
Modern structure assembly.
This commit is contained in:
parent
6290b74878
commit
4ac0a63233
@ -7064,9 +7064,9 @@
|
||||
:: constant
|
||||
::
|
||||
{$leaf *}
|
||||
:: %- decorate
|
||||
:: :+ %wtgr
|
||||
:: [%dtts fetch [%rock %$ q.mod]]
|
||||
%- decorate
|
||||
:+ %wtgr
|
||||
[%dtts fetch [%rock %$ q.mod]]
|
||||
[%rock p.mod q.mod]
|
||||
::
|
||||
:: subjective
|
||||
|
@ -1411,7 +1411,7 @@
|
||||
=. s.bem [for s.bem]
|
||||
%+ tug:bo (load-arch cof bem)
|
||||
|= {cof/cafe arc/arch}
|
||||
(new:bo cof (bind fil.arc $~))
|
||||
(new:bo cof (bind fil.arc |=(* ~)))
|
||||
::
|
||||
++ lace :: load file
|
||||
|= {cof/cafe for/mark bem/beam}
|
||||
|
Loading…
Reference in New Issue
Block a user