Source position: pscanner.pp line 696
type TPasSourcePos = record
FileName: string;
Row: Cardinal;
Column: Cardinal;
end;