Source position: tos.pas line 330
function Fputchar(
f: SmallInt;
c: LongInt;
mode: SmallInt
):LongInt;