Kaynağa Gözat

* when specializing a routine all nested specializations must go to the para- or localsymtable as otherwise the symbol can't be found to be registered

git-svn-id: trunk@43568 -
svenbarth 5 yıl önce
ebeveyn
işleme
1abc9c1fe7
1 değiştirilmiş dosya ile 7 ekleme ve 1 silme
  1. 7 1
      compiler/pgenutil.pas

+ 7 - 1
compiler/pgenutil.pas

@@ -862,7 +862,13 @@ uses
         { decide in which symtable to put the specialization }
         if parse_generic and not assigned(result) then
           begin
-            if assigned(current_procinfo) and (df_generic in current_procinfo.procdef.defoptions) then
+            srsymtable:=symtablestack.top;
+            if (srsymtable.symtabletype in [localsymtable,parasymtable]) and tstoreddef(srsymtable.defowner).is_specialization then
+              { if we are currently specializing a routine we need to specialize into
+                the routine's local- or parasymtable so that they are correctly
+                registered should the specialization be finalized }
+              specializest:=srsymtable
+            else if assigned(current_procinfo) and (df_generic in current_procinfo.procdef.defoptions) then
               { if we are parsing the definition of a method we specialize into
                 the local symtable of it }
               specializest:=current_procinfo.procdef.getsymtable(gs_local)