浏览代码

* extended r21290 to also apply to Java interfaces (they can also contain
constants)

git-svn-id: trunk@21297 -

Jonas Maebe 13 年之前
父节点
当前提交
0fd9228deb
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/pdecobj.pas

+ 1 - 1
compiler/pdecobj.pas

@@ -1427,7 +1427,7 @@ implementation
               but in const blocks too. to make this possible we need to set
               but in const blocks too. to make this possible we need to set
               their symbols to real defs instead of errordef }
               their symbols to real defs instead of errordef }
 
 
-            if assigned(objsym) and (objecttype in [odt_class,odt_javaclass]) then
+            if assigned(objsym) and (objecttype in [odt_class,odt_javaclass,odt_interfacejava]) then
               begin
               begin
                 olddef:=ttypesym(objsym).typedef;
                 olddef:=ttypesym(objsym).typedef;
                 ttypesym(objsym).typedef:=current_structdef;
                 ttypesym(objsym).typedef:=current_structdef;