Source position: pscanner.pp line 973
public property TPascalScanner.CurFilename : string read FCurFilename;