read-strings ( header -- strings )

Vocabulary

terminfo.private

Inputs

header

an object

Outputs

strings

an object

Definition

USING: accessors io kernel sequences ;

IN: terminfo.private

: read-strings ( header -- strings )
    [ #strings>> read-shorts ] [ string-bytes>> read ] bi
    [ string-offset ] curry [ [ f ] if* ] curry map ;