Source position: uPSCompiler.pas line 918
type TPSOnTranslateLineInfoProc = procedure(
Sender: TPSPascalCompiler;
var Pos: Cardinal;
var Row: Cardinal;
var Col: Cardinal;
var Name: TbtString
);