This commit is contained in:
C. Guy Yarvin 2017-10-02 21:49:12 -07:00
parent f2a7257f8a
commit 180ff8ce92
3 changed files with 1 additions and 4 deletions

View File

@ -1538,7 +1538,7 @@
{@ta $~} i.pax
==
=/ she/shell
%*(. *shell her her, man man, active `(sy [%& our.hid man] ~))
%*(. *shell her her, man man, active `(si:nl [%& our.hid man] ~))
sh-abet:~(sh-peer sh ~ `shell`she)
::
++ ra-subscribe :: listen to

View File

@ -409,7 +409,6 @@
$coup (mo-give %mack p.cuf)
$diff %+ mo-pass [%sys %red t.pax]
[%a %want [our him] [%g %gh dap ~] [num %d p.p.cuf q.q.p.cuf]]
$doff !! :: XX
$quit %+ mo-pass [%sys pax]
[%a %want [our him] [%g %gh dap ~] [num %x ~]]
$reap (mo-give %mack p.cuf)
@ -1074,7 +1073,6 @@
?- -.cuf
$coup (ap-take q.q.pry %coup +.pax `!>(p.cuf))
$diff (ap-diff q.q.pry pax p.cuf)
$doff !!
$quit (ap-take q.q.pry %quit +.pax ~)
$reap (ap-take q.q.pry %reap +.pax `!>(p.cuf))
==

View File

@ -880,7 +880,6 @@
++ cuft :: internal gift
$% {$coup p/(unit tang)} :: poke result
{$diff p/cage} :: subscription output
{$doff p/mark q/noun} :: untyped diff
{$quit $~} :: close subscription
{$reap p/(unit tang)} :: peer result
== ::