Source position: pscanner.pp line 436
type TValueSwitches = set of (
vsInterfaces,
vsDispatchField,
vsDispatchStrField
);