瀏覽代碼

* 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;