neo: some changes

This commit is contained in:
Liam Fitzgerald 2024-01-19 12:56:14 -05:00
parent f9fb773d07
commit 0dabfc5c0f
3 changed files with 5 additions and 4 deletions

View File

@ -64,7 +64,6 @@
?~ nex=(~(get by yard.into) i.pith)
?> ?=(~ t.pith)
into(yard (~(put by yard.into) i.pith hall))
:: ~|(no-ancestors/pith !!)
into(yard (~(put by yard.into) i.pith $(pith t.pith, into u.nex)))

View File

@ -27,7 +27,7 @@
%del sta(who (~(del in who.sta) ship.action))
==
++ init
|= old=(unit *)
|= old=*old
*state-0
++ take
|= =sign:neo

View File

@ -11,7 +11,7 @@
+$ yard
$+ yard
$~ ~
(map iota qhall)
(map iota hall)
+$ sign ~
+$ card ~
+$ span (pair path form)
@ -40,10 +40,12 @@
++ take
|~ =sign
*(list card)
++ born
*(list card)
++ init
|~ old=(unit *)
**
++ deep
++ echo
|= [=pith val=*]
*(list card)
--