Ver código fonte

+ optimize OP_XOR by 0 to OP_NONE in optimize_op_const

git-svn-id: trunk@35936 -
nickysn 8 anos atrás
pai
commit
9a1812dfd9
1 arquivos alterados com 6 adições e 0 exclusões
  1. 6 0
      compiler/cgobj.pas

+ 6 - 0
compiler/cgobj.pas

@@ -1505,6 +1505,12 @@ implementation
                 if a=0 then
                   op:=OP_MOVE;
             end;
+          OP_XOR :
+            begin
+              { xor with zero returns same result }
+              if a = 0 then
+                op:=OP_NONE;
+            end;
           OP_DIV :
             begin
               { division by 1 returns result }