2019-10-08 21:54:02 +03:00
|
|
|
|%
|
|
|
|
++ eval
|
|
|
|
|= [=bowl:gall =hoon]
|
|
|
|
^- (list tank)
|
2019-12-03 02:29:19 +03:00
|
|
|
=/ fowl=[our=@p now=@da eny=@uvJ]
|
2019-10-08 21:54:02 +03:00
|
|
|
:+ our.bowl
|
|
|
|
now.bowl
|
|
|
|
(shaz (cat 3 (mix [now eny]:bowl) %eny))
|
|
|
|
::
|
2019-12-03 02:29:19 +03:00
|
|
|
=/ subject [fowl ..zuse]
|
|
|
|
=/ minted=(each [=type =nock] (list tank))
|
|
|
|
%- mule |.
|
|
|
|
(~(mint ut -:!>(subject)) %noun hoon)
|
|
|
|
?: ?=(%| -.minted) p.minted
|
|
|
|
=/ =toon
|
|
|
|
(mock [subject nock.p.minted] |=(^ ~))
|
|
|
|
?- -.toon
|
|
|
|
%0 [(sell type.p.minted p.toon) ~]
|
2019-12-03 03:20:34 +03:00
|
|
|
%1 :- leaf+".^ unsupported in chat eval"
|
|
|
|
(turn ;;((list path) p.toon) smyt)
|
2019-12-03 02:29:19 +03:00
|
|
|
%2 [leaf+"crash!" p.toon]
|
|
|
|
==
|
2019-10-09 00:00:46 +03:00
|
|
|
--
|