2
0
Эх сурвалжийг харах

* fix compilation on targets that use Stabs debug information: ignore generic dummy symbols with no procdefs for generating stabs data

git-svn-id: trunk@48007 -
svenbarth 4 жил өмнө
parent
commit
b8578f804f

+ 3 - 0
compiler/dbgstabs.pas

@@ -480,6 +480,9 @@ implementation
       begin
       begin
         if tsym(p).typ = procsym then
         if tsym(p).typ = procsym then
          begin
          begin
+           if (sp_generic_dummy in tsym(p).symoptions) and
+               (tprocsym(p).procdeflist.count=0) then
+             exit;
            pd :=tprocdef(tprocsym(p).ProcdefList[0]);
            pd :=tprocdef(tprocsym(p).ProcdefList[0]);
            if (po_virtualmethod in pd.procoptions) and
            if (po_virtualmethod in pd.procoptions) and
                not is_objectpascal_helper(pd.struct) then
                not is_objectpascal_helper(pd.struct) then