mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-10-29 15:21:27 +01:00
* use 16-bit operand types for call/jmp immediate on i8086 in taicpu.create_ot
git-svn-id: trunk@30563 -
This commit is contained in:
parent
a25a906d56
commit
fe30b53e95
@ -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 :
|
||||
|
||||
Loading…
Reference in New Issue
Block a user