Explorar o código

Check that tai returned by GetNextInstruction is really a taicpu object before using an explicit typecast

Pierre Muller hai 1 ano
pai
achega
d53af12a6d
Modificáronse 1 ficheiros con 1 adicións e 1 borrados
  1. 1 1
      compiler/x86/aoptx86.pas

+ 1 - 1
compiler/x86/aoptx86.pas

@@ -4535,7 +4535,7 @@ unit aoptx86;
                       end
                     else if (taicpu(hp2).oper[0]^.typ = top_ref) and
                       GetNextInstruction(hp2, hp4) and
-                      (taicpu(hp4).opcode = A_MOV) then
+                      (hp4 is taicpu) and (taicpu(hp4).opcode = A_MOV) then
                       { Optimise the following first:
                           movl [mem1],reg1
                           movl [mem1],reg2