31 lines
398 B
Text
31 lines
398 B
Text
|
# 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
|