Browse Source

* workaround for broken in operator

git-svn-id: trunk@22329 -
florian 13 years ago
parent
commit
03bf93488b
1 changed files with 1 additions and 1 deletions
  1. 1 1
      compiler/arm/aoptcpu.pas

+ 1 - 1
compiler/arm/aoptcpu.pas

@@ -103,7 +103,7 @@ Implementation
   begin
   begin
     result :=
     result :=
       (instr.typ = ait_instruction) and
       (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
       ((cond = []) or (taicpu(instr).condition in cond)) and
       ((postfix = []) or (taicpu(instr).oppostfix in postfix));
       ((postfix = []) or (taicpu(instr).oppostfix in postfix));
   end;
   end;