seek-record ( n file-header -- )

Vocabulary

dbf

Inputs

n	an object
file-header	an object

Outputs

None

Definition

USING: accessors io kernel math ;

IN: dbf

: seek-record ( n file-header -- )
    [ record-length>> * ] [ header-length>> ] bi +
    seek-absolute seek-input ;