summaryrefslogtreecommitdiff
path: root/sim/testsuite/sim/m32r/unlock.cgs
blob: 1a51b7ae4cf1fc7d5b07d080e83029f59f9f936b (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
26
27
28
29
30
# m32r testcase for unlock $src1,@$src2
# mach(): m32r m32rx

	.include "testutils.inc"

	start

	.global unlock
unlock:
	mvaddr_h_gr r4, data_loc
	mvi_h_gr    r5, 1

	lock r5, @r4

	mvi_h_gr r5, 2
	unlock r5, @r4

	ld r6, @r4
	test_h_gr r6, 2

	mvi_h_gr r5, 0
	unlock r5, @r4	; This should be a nop since the processor should be unlocked.

	ld r6, @r4
	test_h_gr r6, 2
	
	pass

data_loc:
	.word 0