decode-key ( hipku key -- seq )

Vocabulary

hipku.private

Inputs

hipku	an object
key	an object

Outputs

seq

an object

Definition

USING: kernel sequences splitting ;

IN: hipku.private

: decode-key ( hipku key -- seq )
    [ [ ?head ] find drop [ [ 32 = ] trim-head ] dip ] map nip ;