Source position: xmlutils.pp line 251
procedure BufAppend(
var ABuffer: TWideCharBuf;
wc: WideChar
);