diff options
Diffstat (limited to 'classattributes/compiler/pdecl.pas')
-rw-r--r-- | classattributes/compiler/pdecl.pas | 9 |
1 files changed, 5 insertions, 4 deletions
diff --git a/classattributes/compiler/pdecl.pas b/classattributes/compiler/pdecl.pas index 7696bb068e..fc0067611e 100644 --- a/classattributes/compiler/pdecl.pas +++ b/classattributes/compiler/pdecl.pas @@ -498,10 +498,11 @@ implementation generictokenbuf:=nil; { class attribute definitions? } - while token=_LECKKLAMMER do - begin - parse_rttiattributes(current_rtticlassattributesdef); - end; + if m_prefixed_attributes in current_settings.modeswitches then + while token=_LECKKLAMMER do + begin + parse_rttiattributes(current_rtticlassattributesdef); + end; { fpc generic declaration? } isgeneric:=not(m_delphi in current_settings.modeswitches) and try_to_consume(_GENERIC); |