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