id3v1? ( seq -- ? )

Vocabulary

id3.private

Inputs

seq

an object

Outputs

?

an object

Definition

USING: combinators.short-circuit math sequences ;

IN: id3.private

: id3v1? ( seq -- ? )
    {
        [ length id3v1-offset >= ]
        [ id3v1-length tail-slice* "TAG" head? ]
    } 1&& ;