Fix help lint
parent
4f77607c13
commit
134dacdb6b
|
@ -25,6 +25,7 @@ $nl
|
||||||
ABOUT: "dlists"
|
ABOUT: "dlists"
|
||||||
|
|
||||||
HELP: <dlist>
|
HELP: <dlist>
|
||||||
|
{ $values { "list" dlist } }
|
||||||
{ $description "Creates a new double-linked list." } ;
|
{ $description "Creates a new double-linked list." } ;
|
||||||
|
|
||||||
HELP: <hashed-dlist>
|
HELP: <hashed-dlist>
|
||||||
|
|
|
@ -23,7 +23,7 @@ TUPLE: dlist
|
||||||
{ front ?dlist-node }
|
{ front ?dlist-node }
|
||||||
{ back ?dlist-node } ;
|
{ back ?dlist-node } ;
|
||||||
|
|
||||||
: <dlist> ( -- obj )
|
: <dlist> ( -- list )
|
||||||
dlist new ; inline
|
dlist new ; inline
|
||||||
|
|
||||||
: <hashed-dlist> ( -- search-deque )
|
: <hashed-dlist> ( -- search-deque )
|
||||||
|
|
|
@ -23,7 +23,7 @@ TUPLE: unrolled-list
|
||||||
unrolled-list new
|
unrolled-list new
|
||||||
unroll-factor >>back-pos ; inline
|
unroll-factor >>back-pos ; inline
|
||||||
|
|
||||||
: <hashed-unrolled-list> ( -- list )
|
: <hashed-unrolled-list> ( -- search-deque )
|
||||||
20 <hashtable> <unrolled-list> <search-deque> ;
|
20 <hashtable> <unrolled-list> <search-deque> ;
|
||||||
|
|
||||||
ERROR: empty-unrolled-list list ;
|
ERROR: empty-unrolled-list list ;
|
||||||
|
|
Loading…
Reference in New Issue