فهرست منبع

* SkipLabels now handles alignment fields correctly

J. Gareth "Curious Kit" Moreton 1 سال پیش
والد
کامیت
2c89ddf62b
1فایلهای تغییر یافته به همراه1 افزوده شده و 1 حذف شده
  1. 1 1
      compiler/aoptutils.pas

+ 1 - 1
compiler/aoptutils.pas

@@ -70,7 +70,7 @@ unit aoptutils;
     function SkipLabels(hp: tai; out hp2: tai): boolean;
     function SkipLabels(hp: tai; out hp2: tai): boolean;
       begin
       begin
         while assigned(hp.next) and
         while assigned(hp.next) and
-              (tai(hp.next).typ in SkipInstr + [ait_label,ait_align]) Do
+              (tai(hp.next).typ in SkipInstr + [ait_label]) Do
           hp := tai(hp.next);
           hp := tai(hp.next);
         if assigned(hp.next) then
         if assigned(hp.next) then
           begin
           begin