Source position: pscanner.pp line 447
type TValueSwitchArray = array [TValueSwitch] of TPasScannerString;