#2 Enumerated types with excplicit values are treated as wrong

[Anonymous]

Take this sample of code and try to analyze it:

<code>
type
TShowExtractionData = (edNever = 5, edAlways,
edIfDealt);
</code>

You get message:
Expected RoundClose found '='
Expected SemiColon found,

both messages point to 'edNever = 5,'

Such a code is completely correct and wide used both
in my and Delphi source code.