Browse Source

* don't check forwarddefs of copied record/objectdefs (there are none, since
such a def is just a renamed version of a def that's defined/implemented/
checked elsewhere) -- fixes compiler crash when compiling webtbs/tw3930
after r26332)

git-svn-id: trunk@26360 -

Jonas Maebe 11 years ago
parent
commit
32b9926536
1 changed files with 3 additions and 1 deletions
  1. 3 1
      compiler/symdef.pas

+ 3 - 1
compiler/symdef.pas

@@ -3598,7 +3598,9 @@ implementation
 
     procedure tabstractrecorddef.check_forwards;
       begin
-        tstoredsymtable(symtable).check_forwards;
+        { the defs of a copied def are defined for the original type only }
+        if not(df_copied_def in defoptions) then
+          tstoredsymtable(symtable).check_forwards;
       end;
 
     function tabstractrecorddef.find_procdef_bytype(pt:tproctypeoption): tprocdef;