v-pick-push ( vec -- vec' )


Vocabulary
json.reader.private

Definition
USING: kernel math sequences ;

IN: json.reader.private

: v-pick-push ( vec -- vec' )
dup length 3 >=
[ dup [ pop ] [ second-last ] bi push ] when ;