Source position: tos.pas line 297
function fread(
handle: SmallInt;
count: LongInt;
buf: pointer
):LongInt;