urbit/shrub
1
1
Fork 0
mirror of https://github.com/urbit/shrub.git synced 2024-12-14 20:02:51 +03:00
Code Issues Packages Projects Releases Wiki Activity

fixes a bug in +nap:to affecting three-item queues

Browse Source
This commit is contained in:
Jose L. Bellod Cisneros 2019-03-30 18:53:05 +01:00
parent 04b71f2cf8
commit 397dd6df81
1 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
sys/hoon.hoon
View File

@ -1875,9 +1875,10 @@
:: ::
++ nap :: removes head ++ nap :: removes head
?> ?=(^ a) ?> ?=(^ a)
?: =(~ l.a) r.a ?~ a ~
=+ b=get(a l.a) =+ b=get
bal(a ^+(a [p.b q.b r.a])) ?~ q.b ~
bal(a ^+(a [n=n.q.b l=l.q.b r=r.q.b]))
:: ::
++ put :: insert new tail ++ put :: insert new tail
|* b/* |* b/*