Quellcode durchsuchen

+ optimize OP_XOR by 0 to OP_NONE in optimize_op_const

git-svn-id: trunk@35936 -
nickysn vor 8 Jahren
Ursprung
Commit
9a1812dfd9
1 geänderte Dateien mit 6 neuen und 0 gelöschten Zeilen
  1. 6 0
      compiler/cgobj.pas

+ 6 - 0
compiler/cgobj.pas

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