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