| # m32r testcase for lock $dr,@$sr | |
| # mach(): m32r m32rx | |
| .include "testutils.inc" | |
| start | |
| .global lock | |
| lock: | |
| mvaddr_h_gr r4, data_loc | |
| mvi_h_gr r5, 0 | |
| lock r5, @r4 | |
| test_h_gr r5, 0x12345678 | |
| ; There is no way to test the lock bit | |
| unlock r5, @r4 ; Unlock the processor | |
| pass | |
| data_loc: | |
| .word 0x12345678 | |