pop ( deque -- item newdeque )

Vocabulary

persistent.deques.private

Inputs

deque

an object

Outputs

item	an object
newdeque	an object

Definition

USING: accessors kernel lists ;

IN: persistent.deques.private

: pop ( deque -- item newdeque )
    dup front>> nil? [ transfer ] [ remove ] if ; inline