search-deque

Vocabulary

search-deques

Definition

IN: search-deques

TUPLE: search-deque assoc deque ;

Methods

USING: accessors assocs deques kernel search-deques ;

M: search-deque clear-deque
    [ deque>> clear-deque ] [ assoc>> clear-assoc ] bi ;


USING: accessors assocs deques kernel search-deques ;

M: search-deque delete-node
    [ deque>> delete-node ]
    [ [ node-value ] [ assoc>> ] bi* delete-at ] 2bi ;


USING: accessors deques search-deques ;

M: search-deque deque-empty? deque>> deque-empty? ;


USING: accessors assocs deques search-deques ;

M: search-deque deque-member? assoc>> key? ;


USING: accessors deques search-deques ;

M: search-deque peek-back* deque>> peek-back* ;


USING: accessors deques search-deques ;

M: search-deque peek-front* deque>> peek-front* ;


USING: accessors assocs deques kernel search-deques ;

M: search-deque pop-back*
    [ deque>> pop-back ] [ assoc>> ] bi delete-at ;


USING: accessors assocs deques kernel search-deques ;

M: search-deque pop-front*
    [ deque>> pop-front ] [ assoc>> ] bi delete-at ;


USING: accessors assocs deques kernel search-deques ;

M: search-deque push-back*
    2dup assoc>> at*
    [ 2nip ]
    [ drop [ deque>> push-back* dup ] [ assoc>> set-at ] 2bi ]
    if ;


USING: accessors assocs deques kernel search-deques ;

M: search-deque push-front*
    2dup assoc>> at*
    [ 2nip ]
    [ drop [ deque>> push-front* dup ] [ assoc>> set-at ] 2bi ]
    if ;