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

* removed unnecessary internalerror triggered when reading wpo info for a
program whereby no methods can be optimized for the last class in the
contextinsensitive_devirtualization section

git-svn-id: trunk@13559 -

Jonas Maebe пре 16 година
родитељ
комит
c6b5038d5e
1 измењених фајлова са 3 додато и 1 уклоњено
  1. 3 1
      compiler/optvirt.pas

+ 3 - 1
compiler/optvirt.pas

@@ -1012,8 +1012,10 @@ unit optvirt;
             { cut off the trailing & }
             setlength(classid,length(classid)-1);
             classdevirtinfo:=unitdevirtinfo.addclass(classid,instantiated);
+            { last class could be an instantiated class without any
+               optimisable methods. }
             if not reader.sectiongetnextline(vmttype) then
-              internalerror(2008100506);
+              exit;
             { any optimisable virtual methods? }
             if (vmttype<>'') then
               begin