ilyakooo0/urbit
1
0
Fork 0
mirror of https://github.com/ilyakooo0/urbit.git synced 2024-11-16 06:28:38 +03:00
Code Issues Packages Projects Releases Wiki Activity

temporary rename of %see to %sei

Browse Source 
REVERT on breach
This commit is contained in:
Anton Dyudin 2016-02-24 15:17:40 -08:00
parent 624364667f
commit 2d0dd169a5
2 changed files with 9 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
arvo/ford.hoon
View File

@ -693,7 +693,7 @@
(stag %nap ;~(pfix cab day:read))
(stag %now ;~(pfix pat day:read))
(stag %saw ;~(pfix sem saw:read))
(stag %see ;~(pfix col see:read))
(stag %sei ;~(pfix col sei:read))
(stag %sic ;~(pfix ket sic:read))
(stag %toy ;~(sfix toy:read fas))
==
@ -751,7 +751,7 @@
;~(plug ;~(sfix wide:vez sem) day)
;~(pfix gap ;~(plug tall:vez day))
::
++ see
++ sei :: XX see
%+ rail
;~(plug ;~(sfix hive col) day)
;~(pfix gap ;~(plug hive day))
@ -1542,7 +1542,11 @@
%+ cope (maul cof gat sam)
(flux |=(a/vase noun+a))
::
$see
$see :: XX remove on breach
=. r.p.hon ?:(?=({$ud $0} r.p.hon) r.how r.p.hon)
$(hon q.hon, how p.hon)
::
$sei :: XX see
=+ vez=(vang & (tope how))
=+ tuz=(posh:vez p.hon)
?~ tuz (flaw cof leaf+"bad tusk: {<p.hon>}" ~)

3
arvo/zuse.hoon
View File

@ -2212,7 +2212,8 @@
{$nap p/horn} :: /_ homo map
{$now p/horn} :: /@ list by @da
{$saw p/twig q/horn} :: /; operate on
{$see p/hops q/horn} :: /: relative to
{$see p/beam q/horn} :: XX remove on breach
{$sei p/hops q/horn} :: /: relative to XX see
{$sic p/twig q/horn} :: /^ cast
{$toy p/? q/mark} :: /mark/ static/hook
== ::