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