mirror of
https://github.com/urbit/shrub.git
synced 2024-11-24 04:58:08 +03:00
various: fix merge problems
This commit is contained in:
parent
4ea0c56849
commit
6408baaa93
@ -1,3 +1,3 @@
|
|||||||
version https://git-lfs.github.com/spec/v1
|
version https://git-lfs.github.com/spec/v1
|
||||||
oid sha256:42b81ff30114d982a485d851879bd3f4abbfaa6272351eaca717e10370af293e
|
oid sha256:8cf44c75799cbad5d8c56913634e35e481cb40baa18a8c31b0702165e1e7d6a0
|
||||||
size 13645079
|
size 13753702
|
||||||
|
@ -1,10 +1,22 @@
|
|||||||
/+ default-agent
|
/+ default-agent
|
||||||
/+ drum=hood-drum, helm=hood-helm, kiln=hood-kiln
|
/+ drum=hood-drum, helm=hood-helm, kiln=hood-kiln
|
||||||
|%
|
|%
|
||||||
+$ state [%16 any-state-tuple]
|
+$ state
|
||||||
|
$~ [%16 *state:drum *state:helm *state:kiln]
|
||||||
|
$>(%16 any-state)
|
||||||
|
::
|
||||||
+$ any-state
|
+$ any-state
|
||||||
$% [ver=?(%1 %2 %3 %4 %5 %6) lac=(map @tas fin-any-state)]
|
$% [ver=?(%1 %2 %3 %4 %5 %6) lac=(map @tas fin-any-state)]
|
||||||
[ver=?(%7 %8 %9 %10 %11 %12 %13 %14 %15 %16) any-state-tuple]
|
[%7 drum=state-2:drum helm=state:helm kiln=state-0:kiln]
|
||||||
|
[%8 drum=state-2:drum helm=state:helm kiln=state-0:kiln]
|
||||||
|
[%9 drum=state-2:drum helm=state:helm kiln=state-0:kiln]
|
||||||
|
[%10 drum=state-2:drum helm=state:helm kiln=state-0:kiln]
|
||||||
|
[%11 drum=state-2:drum helm=state:helm kiln=state-0:kiln]
|
||||||
|
[%12 drum=state-2:drum helm=state:helm kiln=state-0:kiln]
|
||||||
|
[%13 drum=state-2:drum helm=state:helm kiln=state-1:kiln]
|
||||||
|
[%14 drum=state-3:drum helm=state:helm kiln=state-1:kiln]
|
||||||
|
[%15 drum=state-3:drum helm=state:helm kiln=state-2:kiln]
|
||||||
|
[%16 drum=state-4:drum helm=state:helm kiln=state-3:kiln]
|
||||||
==
|
==
|
||||||
+$ any-state-tuple
|
+$ any-state-tuple
|
||||||
$: drum=any-state:drum
|
$: drum=any-state:drum
|
||||||
@ -55,9 +67,9 @@
|
|||||||
=-(?>(?=(%kiln -<) ->) (~(got by lac.old) %kiln))
|
=-(?>(?=(%kiln -<) ->) (~(got by lac.old) %kiln))
|
||||||
==
|
==
|
||||||
==
|
==
|
||||||
=^ d drum.state (on-load:drum-core -.old drum.tup)
|
=^ d drum.state (on-load:(drum bowl *state:drum) -.old drum.tup)
|
||||||
=^ h helm.state (on-load:helm-core -.old helm.tup)
|
=^ h helm.state (on-load:(helm bowl *state:helm) -.old helm.tup)
|
||||||
=^ k kiln.state (on-load:kiln-core -.old kiln.tup)
|
=^ k kiln.state (on-load:(kiln bowl *state:kiln) -.old kiln.tup)
|
||||||
[:(welp d h k) this]
|
[:(welp d h k) this]
|
||||||
::
|
::
|
||||||
++ on-poke
|
++ on-poke
|
||||||
|
@ -81,8 +81,7 @@
|
|||||||
--
|
--
|
||||||
:: TODO: remove .ost
|
:: TODO: remove .ost
|
||||||
::
|
::
|
||||||
|= [hid=bowl:gall any-state]
|
|= [hid=bowl:gall state]
|
||||||
?> ?=(%4 +<+<)
|
|
||||||
=* sat +<+
|
=* sat +<+
|
||||||
=/ ost 0
|
=/ ost 0
|
||||||
=+ (~(gut by bin) ost *source)
|
=+ (~(gut by bin) ost *source)
|
||||||
|
@ -23,8 +23,7 @@
|
|||||||
^- state
|
^- state
|
||||||
[%1 mass-timer:(~(got by hoc.s) 0)]
|
[%1 mass-timer:(~(got by hoc.s) 0)]
|
||||||
--
|
--
|
||||||
|= [=bowl:gall sat=any-state]
|
|= [=bowl:gall sat=state]
|
||||||
?> ?=(%1 -.sat)
|
|
||||||
=| moz=(list card)
|
=| moz=(list card)
|
||||||
|%
|
|%
|
||||||
++ this .
|
++ this .
|
||||||
|
@ -116,8 +116,7 @@
|
|||||||
::
|
::
|
||||||
+$ kiln-fuse-list (unit desk)
|
+$ kiln-fuse-list (unit desk)
|
||||||
--
|
--
|
||||||
|= [bowl:gall any-state]
|
|= [bowl:gall state]
|
||||||
?> ?=(%3 +<+<)
|
|
||||||
?> =(src our)
|
?> =(src our)
|
||||||
=| moz=(list card:agent:gall)
|
=| moz=(list card:agent:gall)
|
||||||
|%
|
|%
|
||||||
|
@ -276,7 +276,7 @@
|
|||||||
:_ this(static-conversions (~(put in static-conversions) [from to]))
|
:_ this(static-conversions (~(put in static-conversions) [from to]))
|
||||||
=/ =wire /static-convert/[from]/[to]
|
=/ =wire /static-convert/[from]/[to]
|
||||||
=/ =rave:clay [%sing %f [%da now.bowl] /[from]/[to]]
|
=/ =rave:clay [%sing %f [%da now.bowl] /[from]/[to]]
|
||||||
[%pass wire %arvo %c %warp our.bowl %home `rave]~
|
[%pass wire %arvo %c %warp our.bowl desk `rave]~
|
||||||
::
|
::
|
||||||
++ cool-static-conversion
|
++ cool-static-conversion
|
||||||
|= [from=term to=term]
|
|= [from=term to=term]
|
||||||
|
Loading…
Reference in New Issue
Block a user