summaryrefslogtreecommitdiff
path: root/Source/DSPSpy/tests/st3_test.ds
blob: a10724af37811af5fbc4741ee3409fd515271d48 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
; This test checks when $st3 gets decremented during BLOOP{,I} iterations.
; Expected $st3 values are: 2, 1, 0x0b88, 2, 1, 0x0b88.

incdir  "tests"
include "dsp_base.inc"

test_main:
	LRI $ac0.l, #2
	BLOOP $ac0.l, last_of_bloop
	CALL send_back
	NOP
	NOP
last_of_bloop:
	NOP
	CALL send_back

	BLOOPI #2, last_of_bloopi
	CALL send_back
	NOP
	NOP
last_of_bloopi:
	NOP
	CALL send_back

	JMP end_of_test