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