فهرست منبع

* ensure that the tai is an instruction in PostPeepHoleOptsCpu before
casting as such

git-svn-id: trunk@32231 -

Jonas Maebe 9 سال پیش
والد
کامیت
5f4ba2c227
1فایلهای تغییر یافته به همراه1 افزوده شده و 0 حذف شده
  1. 1 0
      compiler/jvm/aoptcpu.pas

+ 1 - 0
compiler/jvm/aoptcpu.pas

@@ -174,6 +174,7 @@ Implementation
   function TCpuAsmOptimizer.PostPeepHoleOptsCpu(var p: tai): boolean;
   function TCpuAsmOptimizer.PostPeepHoleOptsCpu(var p: tai): boolean;
     begin
     begin
       result:=
       result:=
+        (p.typ=ait_instruction) and
         RemoveLoadLoadSwap(p);
         RemoveLoadLoadSwap(p);
     end;
     end;