2009-04-26 21:21:15 +00:00
|
|
|
; This test checks the effect of various SR flags over ifz and ifnz
|
2009-04-26 21:38:48 +00:00
|
|
|
incdir "tests"
|
2009-04-26 21:21:15 +00:00
|
|
|
include "dsp_base.inc"
|
|
|
|
|
|
|
|
lri $IX0, #0x0000
|
|
|
|
lri $SR, #0x0001
|
|
|
|
|
|
|
|
ifz
|
|
|
|
lri $IX0, #0x1337
|
|
|
|
call send_back ; 1
|
|
|
|
|
|
|
|
ifnz
|
|
|
|
lri $IX0, #0x1338
|
|
|
|
call send_back ; 2
|
|
|
|
|
|
|
|
lri $IX0, #0x0000
|
|
|
|
lri $SR, #0x0002
|
|
|
|
|
|
|
|
ifz
|
|
|
|
lri $IX0, #0x1337
|
|
|
|
call send_back ; 3
|
|
|
|
|
|
|
|
ifnz
|
|
|
|
lri $IX0, #0x1338
|
|
|
|
call send_back ; 4
|
|
|
|
|
|
|
|
lri $IX0, #0x0000
|
|
|
|
lri $SR, #0x0004
|
|
|
|
|
|
|
|
ifz
|
|
|
|
lri $IX0, #0x1337
|
|
|
|
call send_back ; 5
|
|
|
|
|
|
|
|
ifnz
|
|
|
|
lri $IX0, #0x1338
|
|
|
|
call send_back ; 6
|
|
|
|
|
|
|
|
lri $IX0, #0x0000
|
|
|
|
lri $SR, #0x0008
|
|
|
|
|
|
|
|
ifz
|
|
|
|
lri $IX0, #0x1337
|
|
|
|
call send_back ; 7
|
|
|
|
|
|
|
|
ifnz
|
|
|
|
lri $IX0, #0x1338
|
|
|
|
call send_back ; 8
|
|
|
|
|
|
|
|
lri $IX0, #0x0000
|
|
|
|
lri $SR, #0x000a
|
|
|
|
|
|
|
|
ifz
|
|
|
|
lri $IX0, #0x1337
|
|
|
|
call send_back ; 9
|
|
|
|
|
|
|
|
ifnz
|
|
|
|
lri $IX0, #0x1338
|
|
|
|
call send_back ; 10
|
|
|
|
|
|
|
|
lri $IX0, #0x0000
|
|
|
|
lri $SR, #0x0010
|
|
|
|
|
|
|
|
ifz
|
|
|
|
lri $IX0, #0x1337
|
|
|
|
call send_back ; 11
|
|
|
|
|
|
|
|
ifnz
|
|
|
|
lri $IX0, #0x1338
|
|
|
|
call send_back ; 12
|
|
|
|
|
|
|
|
lri $IX0, #0x0000
|
|
|
|
lri $SR, #0x0020
|
|
|
|
|
|
|
|
ifz
|
|
|
|
lri $IX0, #0x1337
|
|
|
|
call send_back ; 13
|
|
|
|
|
|
|
|
ifnz
|
|
|
|
lri $IX0, #0x1338
|
|
|
|
call send_back ; 14
|
|
|
|
|
|
|
|
lri $IX0, #0x0000
|
|
|
|
lri $SR, #0x0040
|
|
|
|
|
|
|
|
ifz
|
|
|
|
lri $IX0, #0x1337
|
|
|
|
call send_back ; 15
|
|
|
|
|
|
|
|
ifnz
|
|
|
|
lri $IX0, #0x1338
|
|
|
|
call send_back ; 16
|
|
|
|
|
|
|
|
; We're done, DO NOT DELETE THIS LINE
|
|
|
|
jmp end_of_test
|