Source position: pscanner.pp line 987
public property TPascalScanner.CurToken : TToken read FCurToken;