dlists: fix unbalanced-private-declaration.
parent
8744d66467
commit
b2adcaaac9
|
@ -86,8 +86,6 @@ M: dlist equal?
|
||||||
: dlist-each-node ( ... dlist quot: ( ... node -- ... ) -- ... )
|
: dlist-each-node ( ... dlist quot: ( ... node -- ... ) -- ... )
|
||||||
'[ @ f ] dlist-find-node drop ; inline
|
'[ @ f ] dlist-find-node drop ; inline
|
||||||
|
|
||||||
PRIVATE>
|
|
||||||
|
|
||||||
: unlink-node ( dlist-node -- )
|
: unlink-node ( dlist-node -- )
|
||||||
[ prev>> ] [ next>> ] bi
|
[ prev>> ] [ next>> ] bi
|
||||||
[ set-prev-when ]
|
[ set-prev-when ]
|
||||||
|
|
Loading…
Reference in New Issue