Source position: pscanner.pp line 1007
public property TPascalScanner.CurTokenPos : TPasSourcePos read FCurTokenPos;