lock.cgs revision 1.1
1 1.1 christos # m32r testcase for lock $dr,@$sr 2 1.1 christos # mach(): m32r m32rx 3 1.1 christos 4 1.1 christos .include "testutils.inc" 5 1.1 christos 6 1.1 christos start 7 1.1 christos 8 1.1 christos .global lock 9 1.1 christos lock: 10 1.1 christos mvaddr_h_gr r4, data_loc 11 1.1 christos mvi_h_gr r5, 0 12 1.1 christos 13 1.1 christos lock r5, @r4 14 1.1 christos 15 1.1 christos test_h_gr r5, 0x12345678 16 1.1 christos 17 1.1 christos ; There is no way to test the lock bit 18 1.1 christos 19 1.1 christos unlock r5, @r4 ; Unlock the processor 20 1.1 christos 21 1.1 christos pass 22 1.1 christos 23 1.1 christos data_loc: 24 1.1 christos .word 0x12345678 25 1.1 christos 26
Indexes created Thu Sep 10 00:26:39 UTC 2026