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