Source position: pscanner.pp line 976
public procedure TPascalScanner.UnsetNonToken(
aToken: TToken
);