summaryrefslogtreecommitdiff
path: root/sim/testsuite/sim/fr30/stres.cgs
blob: a85fdf3f9f4972a55428542957a65260649405b8 (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
# fr30 testcase for stres $@Ri+,$u4
# mach(): fr30

	.include "testutils.inc"

	START

	.text
	.global stres
stres:
	; Test stres $@Ri+,$u4
	; The current implementation simply increments Ri
	mvi_h_gr   	0x1000,r7
	set_cc          0x0f		; Condition codes are irrelevent
	stres      	0,@r7+
	test_cc		1 1 1 1
	test_h_gr  	0x1004,r7

	mvi_h_gr   	0x1000,r7
	set_cc          0x0f		; Condition codes are irrelevent
	stres      	0xf,@r7+
	test_cc		1 1 1 1
	test_h_gr  	0x1004,r7

	pass