summaryrefslogtreecommitdiff
path: root/classattributes/compiler/pdecl.pas
diff options
context:
space:
mode:
Diffstat (limited to 'classattributes/compiler/pdecl.pas')
-rw-r--r--classattributes/compiler/pdecl.pas9
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);