leaving cal ".cmf8" asp 16 lfr 2
pat cmu zlt $1==2
- with regpair regpair STACK
+ with hl_or_de hl_or_de STACK
uses areg
gen
mov a, %2.2
mov a, %2.1
sbb %1.1
jc {label, $2}
- with const2 regpair STACK
+ with const2 hl_or_de STACK
uses areg
gen
mov a, %2.2
mov a, %2.1
sbi {const1, %1.num >> 8}
jc {label, $2}
- with regpair const2 STACK
+ with hl_or_de const2 STACK
uses areg
gen
mvi a, {const1, %2.num & 0xff}
zlt $2
pat cmu zge $1==2
- with regpair regpair STACK
+ with hl_or_de hl_or_de STACK
uses areg
gen
mov a, %2.2
mov a, %2.1
sbb %1.1
jnc {label, $2}
- with const2 regpair STACK
+ with const2 hl_or_de STACK
uses areg
gen
mov a, %2.2
mov a, %2.1
sbi {const1, %1.num >> 8}
jnc {label, $2}
- with regpair const2 STACK
+ with hl_or_de const2 STACK
uses areg
gen
mvi a, {const1, %2.num & 0xff}
pop psw
ora a
jm {label,$1}
- with regpair STACK
+ with hl_or_de STACK
gen
mov a,%1.1
ora a
jm {label,$1}
pat zle
- with regpair STACK
+ with hl_or_de STACK
uses areg
gen
mov a, %1.1
1:
pat zeq
- with regpair STACK
+ with hl_or_de STACK
uses areg
gen
mov a,%1.1
jz {label,$1}
pat zne
- with regpair STACK
+ with hl_or_de STACK
uses areg
gen
mov a,%1.1
pop psw
ral.
jnc {label,$1}
- with regpair STACK
+ with hl_or_de STACK
gen
mov a,%1.1
ora a
jp {label,$1}
pat zgt
- with regpair STACK
+ with hl_or_de STACK
uses areg
gen
mov a, %1.1
jnz {label,$2}
pat ior zeq $1==2
- with regpair regpair STACK
+ with hl_or_de hl_or_de STACK
uses areg
gen
mov a,%1.1
jz {label,$2}
pat ior zne $1==2
- with regpair regpair STACK
+ with hl_or_de hl_or_de STACK
uses areg
gen
mov a,%1.1
pat asp $1==0 /* do nothing */
pat asp ($1==2)
- with regpair
+ with hl_or_de
with STACK
uses hlreg
gen
pop hl
pat asp ($1==4)
- with regpair regpair
+ with hl_or_de hl_or_de
with STACK
uses hlreg
gen