Source position: tos.pas line 326
function Fcntl(
f: SmallInt;
arg: LongInt;
cmd: SmallInt
):SmallInt;