Răsfoiți Sursa

* more readable fix for the missing ait_instruction check

florian 3 ani în urmă
părinte
comite
81fd3e2748
1 a modificat fișierele cu 1 adăugiri și 3 ștergeri
  1. 1 3
      compiler/aarch64/aoptcpu.pas

+ 1 - 3
compiler/aarch64/aoptcpu.pas

@@ -531,11 +531,9 @@ Implementation
 
 
      else if GetNextInstruction(p, hp1) and
+       MatchInstruction(hp1,[A_ADD,A_SUB],[taicpu(p).condition], [PF_None,PF_S]) and
        (taicpu(p).ops=2) and
-       { Faster to get it out of the way than go through MatchInstruction }
-       (hp1.typ=ait_instruction) and
        (taicpu(hp1).ops=3) and
-       MatchInstruction(hp1,[A_ADD,A_SUB],[taicpu(p).condition], [PF_None,PF_S]) and
        (getsubreg(taicpu(p).oper[0]^.reg)=R_SUBD) and
        (getsubreg(taicpu(hp1).oper[2]^.reg)=R_SUBQ) and
        (getsupreg(taicpu(p).oper[0]^.reg)=getsupreg(taicpu(hp1).oper[2]^.reg)) and