(Under construction.)
procedure BlockRead (var F: File; var Buffer; Blocks: Integer);or
procedure BlockRead (var F: File; var Buffer; Blocks: Integer;
var BlocksRead: Integer);
BlockRead is a UCSD Pascal extension.