浏览代码

* don't remove align directives before case jump tables (they have the type alt_addr)

florian 1 年之前
父节点
当前提交
bf1c674672
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/aoptobj.pas

+ 1 - 1
compiler/aoptobj.pas

@@ -1934,7 +1934,7 @@ Unit AoptObj;
                           repeat
                             with tai_label(tmp).labsym do
                               begin
-                                if (labeltype <> alt_jump) then
+                                if not(labeltype in [alt_addr,alt_jump]) then
                                   begin
                                     { Non-jump label - skip over }
                                     tmp := tai(tmp.Next);