Răsfoiți Sursa

* ensure that the dummy symbol is registered if it's added due to a routine

git-svn-id: trunk@47997 -
svenbarth 4 ani în urmă
părinte
comite
43ba5b69d2
1 a modificat fișierele cu 5 adăugiri și 1 ștergeri
  1. 5 1
      compiler/pdecsub.pas

+ 5 - 1
compiler/pdecsub.pas

@@ -1168,7 +1168,11 @@ implementation
                 else
                   symtablestack.top.insert(dummysym);
               end;
-            include(dummysym.symoptions,sp_generic_dummy);
+            if not (sp_generic_dummy in dummysym.symoptions) then
+              begin
+                include(dummysym.symoptions,sp_generic_dummy);
+                add_generic_dummysym(dummysym);
+              end;
             { start token recorder for the declaration }
             pd.init_genericdecl;
             current_scanner.startrecordtokens(pd.genericdecltokenbuf);