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