Browse Source

* optimize also str/ldrb/h/d

git-svn-id: trunk@22219 -
florian 13 years ago
parent
commit
9d20a73986
1 changed files with 2 additions and 2 deletions
  1. 2 2
      compiler/arm/aoptcpu.pas

+ 2 - 2
compiler/arm/aoptcpu.pas

@@ -979,8 +979,8 @@ Implementation
                       begin
                       begin
                         hp1:=p;
                         hp1:=p;
                         while GetNextInstructionUsingReg(hp1, hp1, taicpu(p).oper[0]^.reg) and
                         while GetNextInstructionUsingReg(hp1, hp1, taicpu(p).oper[0]^.reg) and
-                          (MatchInstruction(hp1, A_LDR, [taicpu(p).condition], [PF_None]) or
-                           MatchInstruction(hp1, A_STR, [taicpu(p).condition], [PF_None])) and
+                          (MatchInstruction(hp1, A_LDR, [taicpu(p).condition], []) or
+                           MatchInstruction(hp1, A_STR, [taicpu(p).condition], [])) and
                           (taicpu(hp1).oper[1]^.ref^.base=taicpu(p).oper[0]^.reg) and
                           (taicpu(hp1).oper[1]^.ref^.base=taicpu(p).oper[0]^.reg) and
                           (taicpu(hp1).oper[1]^.ref^.index=NR_NO) and
                           (taicpu(hp1).oper[1]^.ref^.index=NR_NO) and
                           (taicpu(hp1).oper[1]^.ref^.addressmode=AM_OFFSET) and
                           (taicpu(hp1).oper[1]^.ref^.addressmode=AM_OFFSET) and