Source position: compproc.inc line 182
procedure fpc_Write_Text_Char(
Len: LongInt;
var t: Text;
c: Char
);