(Under construction.)
function FilePos (var F: any file): Integer;
`FilePos' is a Borland Pascal extension.