Parcourir la source

* use 16-bit operand types for call/jmp immediate on i8086 in taicpu.create_ot

git-svn-id: trunk@30563 -
nickysn il y a 10 ans
Parent
commit
fe30b53e95
1 fichiers modifiés avec 8 ajouts et 0 suppressions
  1. 8 0
      compiler/x86/aasmcpu.pas

+ 8 - 0
compiler/x86/aasmcpu.pas

@@ -1234,10 +1234,18 @@ implementation
                              ) then
                             ot:=OT_IMM8 or OT_SHORT
                           else
+{$ifdef i8086}
+                            ot:=OT_IMM16 or OT_NEAR;
+{$else i8086}
                             ot:=OT_IMM32 or OT_NEAR;
+{$endif i8086}
                         end
                       else
+{$ifdef i8086}
+                        ot:=OT_IMM16 or OT_NEAR;
+{$else i8086}
                         ot:=OT_IMM32 or OT_NEAR;
+{$endif i8086}
                     end;
                 end;
               top_local :