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