Source position: tos.pas line 369
function Freadlink(
size: SmallInt;
out buf: shortstring;
const name: shortstring
):LongInt;