소스 검색

* workaround for broken in operator

git-svn-id: trunk@22329 -
florian 13 년 전
부모
커밋
03bf93488b
1개의 변경된 파일1개의 추가작업 그리고 1개의 파일을 삭제
  1. 1 1
      compiler/arm/aoptcpu.pas

+ 1 - 1
compiler/arm/aoptcpu.pas

@@ -103,7 +103,7 @@ Implementation
   begin
     result :=
       (instr.typ = ait_instruction) and
-      ((op = []) or (taicpu(instr).opcode in op)) and
+      ((op = []) or ((ord(taicpu(instr).opcode)<256) and (taicpu(instr).opcode in op))) and
       ((cond = []) or (taicpu(instr).condition in cond)) and
       ((postfix = []) or (taicpu(instr).oppostfix in postfix));
   end;