diff options
Diffstat (limited to 'compiler/pdecobj.pas')
| -rw-r--r-- | compiler/pdecobj.pas | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/compiler/pdecobj.pas b/compiler/pdecobj.pas index 3e8c21cffb..0f7c7d4f71 100644 --- a/compiler/pdecobj.pas +++ b/compiler/pdecobj.pas @@ -1216,7 +1216,10 @@ implementation begin if is_interface(current_structdef) or is_objc_protocol_or_category(current_structdef) or - is_objectpascal_helper(current_structdef) or + ( + is_objectpascal_helper(current_structdef) and + not class_fields + ) or (is_javainterface(current_structdef) and not(class_fields and final_fields)) then Message(parser_e_no_vars_in_interfaces); |