1010 lines
22 KiB
ArmAsm
1010 lines
22 KiB
ArmAsm
# Hitachi H8 testcase 'subx'
|
|
# mach(): all
|
|
# as(h8300): --defsym sim_cpu=0
|
|
# as(h8300h): --defsym sim_cpu=1
|
|
# as(h8300s): --defsym sim_cpu=2
|
|
# as(h8sx): --defsym sim_cpu=3
|
|
# ld(h8300h): -m h8300helf
|
|
# ld(h8300s): -m h8300self
|
|
# ld(h8sx): -m h8300sxelf
|
|
|
|
.include "testutils.inc"
|
|
|
|
# Instructions tested:
|
|
# subx.b #xx:8, rd8 ; b rd8 xxxxxxxx
|
|
# subx.b #xx:8, @erd ; 7 d erd ???? b ???? xxxxxxxx
|
|
# subx.b #xx:8, @erd- ; 0 1 7 6 6 c erd 1??? b ???? xxxxxxxx
|
|
# subx.b rs8, rd8 ; 1 e rs8 rd8
|
|
# subx.b rs8, @erd ; 7 d erd ???? 1 e rs8 ????
|
|
# subx.b rs8, @erd- ; 0 1 7 6 6 c erd 1??? 1 e rs8 ????
|
|
# subx.b @ers, rd8 ; 7 c ers ???? 1 e ???? rd8
|
|
# subx.b @ers-, rd8 ; 0 1 7 6 6 c ers 00?? 1 e ???? rd8
|
|
# subx.b @ers, @erd ; 0 1 7 4 6 8 ers d 0 erd 3 ????
|
|
# subx.b @ers-, @erd- ; 0 1 7 6 6 c ers d a erd 3 ????
|
|
#
|
|
# word ops
|
|
# long ops
|
|
|
|
.data
|
|
byte_src: .byte 0x5
|
|
byte_dest: .byte 0
|
|
|
|
.align 2
|
|
word_src: .word 0x505
|
|
word_dest: .word 0
|
|
|
|
.align 4
|
|
long_src: .long 0x50505
|
|
long_dest: .long 0
|
|
|
|
|
|
start
|
|
|
|
subx_b_imm8_0:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
set_ccr_zero
|
|
|
|
;; subx.b #xx:8,Rd ; Subx with carry initially zero.
|
|
subx.b #5, r0l ; Immediate 8-bit operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr16 0xa5a0 r0 ; sub result: a5 - 5
|
|
.if (sim_cpu) ; non-zero means h8300h, s, or sx
|
|
test_h_gr32 0xa5a5a5a0 er0 ; sub result: a5 - 5
|
|
.endif
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_b_imm8_1:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
set_ccr_zero
|
|
|
|
;; subx.b #xx:8,Rd ; Subx with carry initially one.
|
|
set_carry_flag
|
|
subx.b #4, r0l ; Immediate 8-bit operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr16 0xa5a0 r0 ; sub result: a5 - (4 + 1)
|
|
.if (sim_cpu) ; non-zero means h8300h, s, or sx
|
|
test_h_gr32 0xa5a5a5a0 er0 ; sub result: a5 - (4 + 1)
|
|
.endif
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
.if (sim_cpu == h8sx)
|
|
subx_b_imm8_rdind:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.b #xx:8,@eRd ; Subx to register indirect
|
|
mov #byte_dest, er0
|
|
mov.b #0xa5, @er0
|
|
set_ccr_zero
|
|
subx.b #5, @er0
|
|
|
|
test_carry_clear ; H=0 N=0 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 byte_dest er0 ; er0 still contains subress
|
|
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.b #0xa0, @byte_dest
|
|
beq .Lb1
|
|
fail
|
|
.Lb1:
|
|
|
|
subx_b_imm8_rdpostdec:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.b #xx:8,@eRd- ; Subx to register post-decrement
|
|
mov #byte_dest, er0
|
|
mov.b #0xa5, @er0
|
|
set_ccr_zero
|
|
subx.b #5, @er0-
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 byte_dest-1 er0 ; er0 contains subress minus one
|
|
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.b #0xa0, @byte_dest
|
|
beq .Lb2
|
|
fail
|
|
.Lb2:
|
|
.endif
|
|
|
|
subx_b_reg8_0:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.b Rs,Rd ; subx with carry initially zero
|
|
mov.b #5, r0h
|
|
set_ccr_zero
|
|
subx.b r0h, r0l ; Register operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr16 0x05a0 r0 ; sub result: a5 - 5
|
|
.if (sim_cpu) ; non-zero means h8300h, s, or sx
|
|
test_h_gr32 0xa5a505a0 er0 ; sub result: a5 - 5
|
|
.endif
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_b_reg8_1:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.b Rs,Rd ; subx with carry initially one
|
|
mov.b #4, r0h
|
|
set_ccr_zero
|
|
set_carry_flag
|
|
subx.b r0h, r0l ; Register operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr16 0x04a0 r0 ; sub result: a5 - (4 + 1)
|
|
.if (sim_cpu) ; non-zero means h8300h, s, or sx
|
|
test_h_gr32 0xa5a504a0 er0 ; sub result: a5 - (4 + 1)
|
|
.endif
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
.if (sim_cpu == h8sx)
|
|
subx_b_reg8_rdind:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.b rs8,@eRd ; Subx to register indirect
|
|
mov #byte_dest, er0
|
|
mov.b #0xa5, @er0
|
|
mov.b #5, r1l
|
|
set_ccr_zero
|
|
subx.b r1l, @er0
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 byte_dest er0 ; er0 still contains subress
|
|
test_h_gr32 0xa5a5a505 er1 ; er1 has the test load
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.b #0xa0, @byte_dest
|
|
beq .Lb3
|
|
fail
|
|
.Lb3:
|
|
|
|
subx_b_reg8_rdpostdec:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.b rs8,@eRd- ; Subx to register post-decrement
|
|
mov #byte_dest, er0
|
|
mov.b #0xa5, @er0
|
|
mov.b #5, r1l
|
|
set_ccr_zero
|
|
subx.b r1l, @er0-
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 byte_dest-1 er0 ; er0 contains subress minus one
|
|
test_h_gr32 0xa5a5a505 er1 ; er1 contains the test load
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.b #0xa0, @byte_dest
|
|
beq .Lb4
|
|
fail
|
|
.Lb4:
|
|
|
|
subx_b_rsind_reg8:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.b @eRs,rd8 ; Subx from reg indirect to reg
|
|
mov #byte_src, er0
|
|
set_ccr_zero
|
|
subx.b @er0, r1l
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 byte_src er0 ; er0 still contains subress
|
|
test_h_gr32 0xa5a5a5a0 er1 ; er1 contains the sum
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_b_rspostdec_reg8:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.b @eRs-,rd8 ; Subx to register post-decrement
|
|
mov #byte_src, er0
|
|
set_ccr_zero
|
|
subx.b @er0-, r1l
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 byte_src-1 er0 ; er0 contains subress minus one
|
|
test_h_gr32 0xa5a5a5a0 er1 ; er1 contains the sum
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_b_rsind_rdind:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.b @eRs,rd8 ; Subx from reg indirect to reg
|
|
mov #byte_src, er0
|
|
mov #byte_dest, er1
|
|
mov.b #0xa5, @er1
|
|
set_ccr_zero
|
|
subx.b @er0, @er1
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 byte_src er0 ; er0 still contains src subress
|
|
test_h_gr32 byte_dest er1 ; er1 still contains dst subress
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
;; Now check the result of the sub to memory.
|
|
cmp.b #0xa0, @byte_dest
|
|
beq .Lb5
|
|
fail
|
|
.Lb5:
|
|
|
|
subx_b_rspostdec_rdpostdec:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
mov #byte_src, er0
|
|
mov #byte_dest, er1
|
|
mov.b #0xa5, @er1
|
|
set_ccr_zero
|
|
;; subx.b @eRs-,@erd- ; Subx post-decrement to post-decrement
|
|
subx.b @er0-, @er1-
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 byte_src-1 er0 ; er0 contains src subress minus one
|
|
test_h_gr32 byte_dest-1 er1 ; er1 contains dst subress minus one
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
;; Now check the result of the sub to memory.
|
|
cmp.b #0xa0, @byte_dest
|
|
beq .Lb6
|
|
fail
|
|
.Lb6:
|
|
|
|
subx_w_imm16_0:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
set_ccr_zero
|
|
|
|
;; subx.w #xx:16,Rd ; Subx with carry initially zero.
|
|
subx.w #0x505, r0 ; Immediate 16-bit operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr16 0xa0a0 r0 ; sub result: 0xa5a5 + 0x505
|
|
test_h_gr32 0xa5a5a0a0 er0 ; sub result: 0xa5a5 + 0x505
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_w_imm16_1:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
set_ccr_zero
|
|
|
|
;; subx.w #xx:16,Rd ; Subx with carry initially one.
|
|
set_carry_flag
|
|
subx.w #0x504, r0 ; Immediate 16-bit operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr16 0xa0a0 r0 ; sub result: 0xa5a5 + 0x505 + 1
|
|
test_h_gr32 0xa5a5a0a0 er0 ; sub result: 0xa5a5 + 0x505 + 1
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_w_imm16_rdind:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w #xx:16,@eRd ; Subx to register indirect
|
|
mov #word_dest, er0
|
|
mov.w #0xa5a5, @er0
|
|
set_ccr_zero
|
|
subx.w #0x505, @er0
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 word_dest er0 ; er0 still contains subress
|
|
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.w #0xa0a0, @word_dest
|
|
beq .Lw1
|
|
fail
|
|
.Lw1:
|
|
|
|
subx_w_imm16_rdpostdec:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w #xx:16,@eRd- ; Subx to register post-decrement
|
|
mov #word_dest, er0
|
|
mov.w #0xa5a5, @er0
|
|
set_ccr_zero
|
|
subx.w #0x505, @er0-
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 word_dest-2 er0 ; er0 contains subress minus one
|
|
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.w #0xa0a0, @word_dest
|
|
beq .Lw2
|
|
fail
|
|
.Lw2:
|
|
|
|
subx_w_reg16_0:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w Rs,Rd ; subx with carry initially zero
|
|
mov.w #0x505, e0
|
|
set_ccr_zero
|
|
subx.w e0, r0 ; Register operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 0x0505a0a0 er0 ; sub result:
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_w_reg16_1:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w Rs,Rd ; subx with carry initially one
|
|
mov.w #0x504, e0
|
|
set_ccr_zero
|
|
set_carry_flag
|
|
subx.w e0, r0 ; Register operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 0x0504a0a0 er0 ; sub result:
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_w_reg16_rdind:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w rs8,@eRd ; Subx to register indirect
|
|
mov #word_dest, er0
|
|
mov.w #0xa5a5, @er0
|
|
mov.w #0x505, r1
|
|
set_ccr_zero
|
|
subx.w r1, @er0
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 word_dest er0 ; er0 still contains subress
|
|
test_h_gr32 0xa5a50505 er1 ; er1 has the test load
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.w #0xa0a0, @word_dest
|
|
beq .Lw3
|
|
fail
|
|
.Lw3:
|
|
|
|
subx_w_reg16_rdpostdec:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w rs8,@eRd- ; Subx to register post-decrement
|
|
mov #word_dest, er0
|
|
mov.w #0xa5a5, @er0
|
|
mov.w #0x505, r1
|
|
set_ccr_zero
|
|
subx.w r1, @er0-
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 word_dest-2 er0 ; er0 contains subress minus one
|
|
test_h_gr32 0xa5a50505 er1 ; er1 contains the test load
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.w #0xa0a0, @word_dest
|
|
beq .Lw4
|
|
fail
|
|
.Lw4:
|
|
|
|
subx_w_rsind_reg16:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w @eRs,rd8 ; Subx from reg indirect to reg
|
|
mov #word_src, er0
|
|
set_ccr_zero
|
|
subx.w @er0, r1
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 word_src er0 ; er0 still contains subress
|
|
test_h_gr32 0xa5a5a0a0 er1 ; er1 contains the sum
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_w_rspostdec_reg16:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w @eRs-,rd8 ; Subx to register post-decrement
|
|
mov #word_src, er0
|
|
set_ccr_zero
|
|
subx.w @er0-, r1
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 word_src-2 er0 ; er0 contains subress minus one
|
|
test_h_gr32 0xa5a5a0a0 er1 ; er1 contains the sum
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_w_rsind_rdind:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w @eRs,rd8 ; Subx from reg indirect to reg
|
|
mov #word_src, er0
|
|
mov #word_dest, er1
|
|
mov.w #0xa5a5, @er1
|
|
set_ccr_zero
|
|
subx.w @er0, @er1
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 word_src er0 ; er0 still contains src subress
|
|
test_h_gr32 word_dest er1 ; er1 still contains dst subress
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
;; Now check the result of the sub to memory.
|
|
cmp.w #0xa0a0, @word_dest
|
|
beq .Lw5
|
|
fail
|
|
.Lw5:
|
|
|
|
subx_w_rspostdec_rdpostdec:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.w @eRs-,rd8 ; Subx to register post-decrement
|
|
mov #word_src, er0
|
|
mov #word_dest, er1
|
|
mov.w #0xa5a5, @er1
|
|
set_ccr_zero
|
|
subx.w @er0-, @er1-
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 word_src-2 er0 ; er0 contains src subress minus one
|
|
test_h_gr32 word_dest-2 er1 ; er1 contains dst subress minus one
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
;; Now check the result of the sub to memory.
|
|
cmp.w #0xa0a0, @word_dest
|
|
beq .Lw6
|
|
fail
|
|
.Lw6:
|
|
|
|
subx_l_imm32_0:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
set_ccr_zero
|
|
|
|
;; subx.l #xx:32,Rd ; Subx with carry initially zero.
|
|
subx.l #0x50505, er0 ; Immediate 32-bit operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 0xa5a0a0a0 er0 ; sub result:
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_l_imm32_1:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
set_ccr_zero
|
|
|
|
;; subx.l #xx:32,Rd ; Subx with carry initially one.
|
|
set_carry_flag
|
|
subx.l #0x50504, er0 ; Immediate 32-bit operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 0xa5a0a0a0 er0 ; sub result:
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_l_imm32_rdind:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l #xx:32,@eRd ; Subx to register indirect
|
|
mov #long_dest, er0
|
|
mov.l #0xa5a5a5a5, @er0
|
|
set_ccr_zero
|
|
subx.l #0x50505, @er0
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 long_dest er0 ; er0 still contains subress
|
|
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.l #0xa5a0a0a0, @long_dest
|
|
beq .Ll1
|
|
fail
|
|
.Ll1:
|
|
|
|
subx_l_imm32_rdpostdec:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l #xx:32,@eRd- ; Subx to register post-decrement
|
|
mov #long_dest, er0
|
|
mov.l #0xa5a5a5a5, @er0
|
|
set_ccr_zero
|
|
subx.l #0x50505, @er0-
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 long_dest-4 er0 ; er0 contains subress minus one
|
|
|
|
test_gr_a5a5 1 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 2
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.l #0xa5a0a0a0, @long_dest
|
|
beq .Ll2
|
|
fail
|
|
.Ll2:
|
|
|
|
subx_l_reg32_0:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l Rs,Rd ; subx with carry initially zero
|
|
mov.l #0x50505, er0
|
|
set_ccr_zero
|
|
subx.l er0, er1 ; Register operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 0x50505 er0 ; sub load
|
|
test_h_gr32 0xa5a0a0a0 er1 ; sub result:
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_l_reg32_1:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l Rs,Rd ; subx with carry initially one
|
|
mov.l #0x50504, er0
|
|
set_ccr_zero
|
|
set_carry_flag
|
|
subx.l er0, er1 ; Register operand
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 0x50504 er0 ; sub result:
|
|
test_h_gr32 0xa5a0a0a0 er1 ; sub result:
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_l_reg32_rdind:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l rs8,@eRd ; Subx to register indirect
|
|
mov #long_dest, er0
|
|
mov.l er1, @er0
|
|
mov.l #0x50505, er1
|
|
set_ccr_zero
|
|
subx.l er1, @er0
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 long_dest er0 ; er0 still contains subress
|
|
test_h_gr32 0x50505 er1 ; er1 has the test load
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.l #0xa5a0a0a0, @long_dest
|
|
beq .Ll3
|
|
fail
|
|
.Ll3:
|
|
|
|
subx_l_reg32_rdpostdec:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l rs8,@eRd- ; Subx to register post-decrement
|
|
mov #long_dest, er0
|
|
mov.l er1, @er0
|
|
mov.l #0x50505, er1
|
|
set_ccr_zero
|
|
subx.l er1, @er0-
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 long_dest-4 er0 ; er0 contains subress minus one
|
|
test_h_gr32 0x50505 er1 ; er1 contains the test load
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
;; Now check the result of the sub to memory.
|
|
cmp.l #0xa5a0a0a0, @long_dest
|
|
beq .Ll4
|
|
fail
|
|
.Ll4:
|
|
|
|
subx_l_rsind_reg32:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l @eRs,rd8 ; Subx from reg indirect to reg
|
|
mov #long_src, er0
|
|
set_ccr_zero
|
|
subx.l @er0, er1
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 long_src er0 ; er0 still contains subress
|
|
test_h_gr32 0xa5a0a0a0 er1 ; er1 contains the sum
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_l_rspostdec_reg32:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l @eRs-,rd8 ; Subx to register post-decrement
|
|
mov #long_src, er0
|
|
set_ccr_zero
|
|
subx.l @er0-, er1
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 long_src-4 er0 ; er0 contains subress minus one
|
|
test_h_gr32 0xa5a0a0a0 er1 ; er1 contains the sum
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
|
|
subx_l_rsind_rdind:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l @eRs,rd8 ; Subx from reg indirect to reg
|
|
mov #long_src, er0
|
|
mov #long_dest, er1
|
|
mov.l er2, @er1
|
|
set_ccr_zero
|
|
subx.l @er0, @er1
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 long_src er0 ; er0 still contains src subress
|
|
test_h_gr32 long_dest er1 ; er1 still contains dst subress
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
;; Now check the result of the sub to memory.
|
|
cmp.l #0xa5a0a0a0, @long_dest
|
|
beq .Ll5
|
|
fail
|
|
.Ll5:
|
|
|
|
subx_l_rspostdec_rdpostdec:
|
|
set_grs_a5a5 ; Fill all general regs with a fixed pattern
|
|
|
|
;; subx.l @eRs-,rd8 ; Subx to register post-decrement
|
|
mov #long_src, er0
|
|
mov #long_dest, er1
|
|
mov.l er2, @er1
|
|
set_ccr_zero
|
|
subx.l @er0-, @er1-
|
|
|
|
test_carry_clear ; H=0 N=1 Z=0 V=0 C=0
|
|
test_ovf_clear
|
|
test_zero_clear
|
|
test_neg_set
|
|
|
|
test_h_gr32 long_src-4 er0 ; er0 contains src subress minus one
|
|
test_h_gr32 long_dest-4 er1 ; er1 contains dst subress minus one
|
|
|
|
test_gr_a5a5 2 ; Make sure other general regs not disturbed
|
|
test_gr_a5a5 3
|
|
test_gr_a5a5 4
|
|
test_gr_a5a5 5
|
|
test_gr_a5a5 6
|
|
test_gr_a5a5 7
|
|
;; Now check the result of the sub to memory.
|
|
cmp.l #0xa5a0a0a0, @long_dest
|
|
beq .Ll6
|
|
fail
|
|
.Ll6:
|
|
.endif
|
|
pass
|
|
|
|
exit 0
|