Add =model syntax.

This commit is contained in:
C. Guy Yarvin 2017-11-29 10:59:48 -08:00
parent a4538d4643
commit 212f58368f

View File

@ -11191,6 +11191,23 @@
(stag %bcts ;~(plug sym ;~(pfix ;~(pose fas tis) wyde)))
scab
==
:- '='
;~ pfix tis
%+ sear
|= hon/hoon
^- (unit hoon)
%+ bind
|- ^- (unit term)
?+ hon ~
{$wing *} ?~(p.hon ~ ?^(i.p.hon ~ `i.p.hon))
{$limb *} `p.hon
{$dbug *} $(hon ~(open ap hon))
{$tsgl *} $(hon ~(open ap hon))
{$tsgr *} $(hon q.hon)
==
|=(term [%bcts +< hon])
wyde
==
==
::
++ scat !: