dlist>seq was defined in dlists and linked-assocs

db4
Doug Coleman 2008-11-29 20:17:16 -06:00
parent 09a431f0b3
commit 1a50bcce75
1 changed files with 0 additions and 3 deletions

View File

@ -28,9 +28,6 @@ M: linked-assoc set-at
[ 2dup assoc>> key? [ 2dup delete-at ] when add-to-dlist ] 2keep
assoc>> set-at ;
: dlist>seq ( dlist -- seq )
[ ] pusher [ dlist-each ] dip ;
M: linked-assoc >alist
dlist>> dlist>seq ;