From b54d9cfecbf88fade10380b310742c78d002dcad Mon Sep 17 00:00:00 2001 From: nickysn Date: Sun, 17 May 2020 11:35:42 +0000 Subject: [PATCH] * fixed IsJumpToLabelUncond for the Z80 git-svn-id: trunk@45397 - --- compiler/aoptobj.pas | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/compiler/aoptobj.pas b/compiler/aoptobj.pas index 8675ffc4f7..349d2c2a31 100644 --- a/compiler/aoptobj.pas +++ b/compiler/aoptobj.pas @@ -1562,9 +1562,9 @@ Unit AoptObj; {$else avr} result:=(hp.opcode=aopt_uncondjmp) and {$endif avr} -{$if defined(arm) or defined(aarch64)} +{$if defined(arm) or defined(aarch64) or defined(z80)} (hp.condition=c_None) and -{$endif arm or aarch64} +{$endif arm or aarch64 or z80} (hp.ops>0) and {$if defined(riscv32) or defined(riscv64)} (hp.oper[0]^.reg=NR_X0) and