فهرست منبع

* optimizing length(<dyn. type>)=0 is not possible for jvm

git-svn-id: trunk@43280 -
florian 6 سال پیش
والد
کامیت
ee3258c0da
1فایلهای تغییر یافته به همراه4 افزوده شده و 1 حذف شده
  1. 4 1
      compiler/nadd.pas

+ 4 - 1
compiler/nadd.pas

@@ -1203,8 +1203,11 @@ implementation
                         ;
                     end;
                   end
+{$ifndef jvm}
                 else if (nodetype=equaln) and MatchAndTransformNodesCommutative(left,right,@IsLengthZero,@TransformLengthZero,Result) then
-                   exit;
+                   exit
+{$endif jvm}
+                   ;
               end;
 
             { using sqr(x) for reals instead of x*x might reduces register pressure and/or