瀏覽代碼

Fix 3 operand version of MatchOpType

git-svn-id: trunk@40196 -
pierre 6 年之前
父節點
當前提交
0e546d47ca
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      compiler/aoptutils.pas

+ 1 - 1
compiler/aoptutils.pas

@@ -55,7 +55,7 @@ unit aoptutils;
 {$if max_operands>2}
 {$if max_operands>2}
     function MatchOpType(const p : taicpu; type0,type1,type2 : toptype) : Boolean;
     function MatchOpType(const p : taicpu; type0,type1,type2 : toptype) : Boolean;
       begin
       begin
-        Result:=(p.ops=3) and (p.oper[0]^.typ=type0) and (p.oper[1]^.typ=type1) and (p.oper[2]^.typ=type1);
+        Result:=(p.ops=3) and (p.oper[0]^.typ=type0) and (p.oper[1]^.typ=type1) and (p.oper[2]^.typ=type2);
       end;
       end;
 {$endif max_operands>2}
 {$endif max_operands>2}