parse-index ( cuesheet str -- cuesheet )

Vocabulary

cuesheet.private

Inputs

cuesheet	an object
str	an object

Outputs

cuesheet

an object

Definition

USING: accessors cuesheet kernel math.parser sequences splitting
;

IN: cuesheet.private

: parse-index ( cuesheet str -- cuesheet )
    [ last-track ] [
        " " split1 [ string>number ] dip <index>
        [ suffix ] curry change-indices drop
    ] bi* ;