Fixed syntax errors.

This commit is contained in:
Fang 2017-03-27 11:26:23 +02:00
parent c27d9fcf8d
commit a2d2633776
2 changed files with 4 additions and 2 deletions

View File

@ -1246,7 +1246,7 @@
nak (~(put ju nak) cha lix) nak (~(put ju nak) cha lix)
== ==
%_ ..sh-work %_ ..sh-work
(sh-update %glyph cha lix) ..sh (sh-update %bind cha lix)
== ==
:: ::
++ join :: %join ++ join :: %join
@ -1926,10 +1926,12 @@
%~ tap by %~ tap by
%- ~(uni by +.rad) %- ~(uni by +.rad)
(~(run by folks) some) (~(run by folks) some)
==
|= {s/ship h/(unit human)} |= {s/ship h/(unit human)}
?~ h ~ ?~ h ~
[s u.h] [s u.h]
== ==
==
:: ::
++ poke-sole-action :: accept console ++ poke-sole-action :: accept console
::x incoming sole action. process it. ::x incoming sole action. process it.

View File

@ -11,7 +11,7 @@
{$review (list thought)} :: deliver {$review (list thought)} :: deliver
== :: == ::
++ update :: change shared state ++ update :: change shared state
$% {$status (pair (set knot) status) :: our status update $% {$status (pair (set knot) status)} :: our status update
{$human (pair ship (unit human))} :: new identity {$human (pair ship (unit human))} :: new identity
{$bind (pair char (set partner))} :: bind a glyph {$bind (pair char (set partner))} :: bind a glyph
== :: == ::