Преглед изворни кода

* also process nested records/objects when generating implementations
for synthetic methods

git-svn-id: branches/jvmbackend@18474 -

Jonas Maebe пре 14 година
родитељ
комит
91e06f7139
1 измењених фајлова са 2 додато и 0 уклоњено
  1. 2 0
      compiler/symcreat.pas

+ 2 - 0
compiler/symcreat.pas

@@ -350,6 +350,8 @@ implementation
              if not sstate.valid then
                replace_scanner('synthetic_impl',sstate);
             add_synthetic_method_implementations_for_struct(tabstractrecorddef(def));
+            { also complete nested types }
+            add_synthetic_method_implementations(tabstractrecorddef(def).symtable);
            end;
         end;
       restore_scanner(sstate);