track-or-disc ( cuesheet -- cuesheet track/disc )

Vocabulary

cuesheet.private

Inputs

cuesheet

an object

Outputs

cuesheet	an object
track/disc	an object

Definition

USING: accessors kernel sequences ;

IN: cuesheet.private

: track-or-disc ( cuesheet -- cuesheet track/disc )
    dup files>> [ dup ] [ last tracks>> last ] if-empty ;