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