paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-04-10 13:59:34 +02:00
Code Issues Packages Projects Releases Wiki Activity

* Z80: match both signed and unsigned 16-bit constants as OT_IMM16 in the asm instab lookup

Browse Source 
git-svn-id: trunk@45248 -
This commit is contained in:
nickysn 2020-05-04 00:20:50 +00:00
parent 27e9dde81a
commit 5d2be4da1c
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
compiler/z80/aasmcpu.pas
View File

@ -217,7 +217,7 @@ implementation
(oper.ref^.refaddr in [addr_hi8,addr_lo8]) and assigned(oper.ref^.symbol) and
(oper.ref^.base=NR_NO) and (oper.ref^.index=NR_NO));
OT_IMM16:
result:=((oper.typ=top_const) and (oper.val>=0) and (oper.val<=65535)) or
result:=((oper.typ=top_const) and (oper.val>=-32768) and (oper.val<=65535)) or
((oper.typ=top_ref) and
(oper.ref^.refaddr=addr_full) and assigned(oper.ref^.symbol) and
(oper.ref^.base=NR_NO) and (oper.ref^.index=NR_NO));