瀏覽代碼

* while updating used register sets, all labels can/must be skipped

git-svn-id: trunk@33909 -
florian 9 年之前
父節點
當前提交
d05222990e
共有 1 個文件被更改,包括 1 次插入2 次删除
  1. 1 2
      compiler/aoptobj.pas

+ 1 - 2
compiler/aoptobj.pas

@@ -404,8 +404,7 @@ Unit AoptObj;
         repeat
           while assigned(p) and
                 ((p.typ in (SkipInstr - [ait_RegAlloc])) or
-                 ((p.typ = ait_label) and
-                  labelCanBeSkipped(tai_label(p))) or
+                 (p.typ = ait_label) or
                  ((p.typ = ait_marker) and
                   (tai_Marker(p).Kind in [mark_AsmBlockEnd,mark_NoLineInfoStart,mark_NoLineInfoEnd]))) do
                p := tai(p.next);