persistent.vectors: fix unbalanced private
parent
423b2afb91
commit
3705d6e387
|
@ -156,8 +156,6 @@ M: persistent-vector new-nth ( obj i pvec -- pvec' )
|
||||||
} cond
|
} cond
|
||||||
] dip [ >>root ] [ >>tail ] bi* ;
|
] dip [ >>root ] [ >>tail ] bi* ;
|
||||||
|
|
||||||
PRIVATE>
|
|
||||||
|
|
||||||
M: persistent-vector ppop ( pvec -- pvec' )
|
M: persistent-vector ppop ( pvec -- pvec' )
|
||||||
dup count>> {
|
dup count>> {
|
||||||
{ 0 [ empty-error ] }
|
{ 0 [ empty-error ] }
|
||||||
|
|
Loading…
Reference in New Issue