소스 검색

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}
     function MatchOpType(const p : taicpu; type0,type1,type2 : toptype) : Boolean;
       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;
 {$endif max_operands>2}