URL
https://opencores.org/ocsvn/or1k/or1k/trunk
Subversion Repositories or1k
[/] [or1k/] [branches/] [oc/] [gdb-5.0/] [sim/] [testsuite/] [d30v-elf/] [ls-modaddr.S] - Rev 106
Go to most recent revision | Compare with Previous | Blame | View Log
; Modular address postincrement/postdecrement test
start:
; program PSW for modular address mode
add r1,r0,0x81000000
nop || nop
mvtsys psw,r1 || nop
nop || nop
test1:
; set modular address limits: 0x18 bytes
add r1,r0,0x20000070 ; [start, ...
nop || nop
mvtsys mod_s,r1 || nop
nop || nop
add r1,r0,0x20000088 ; ..., end)
nop || nop
mvtsys mod_e,r1 || nop
; modular autoincrement test
add r30,r0,0x20000070 ; base address = mod_s
ld2w r40,@(r30+,r0) || nop ; after: r30 = ...078
ld2w r40,@(r30+,r0) || nop ; after: r30 = ...080
ld2w r40,@(r30+,r0) || nop ; after: r30 = ...070
add r29,r0,0x20000070 ; expected end address; wrapping around
cmpeq f1,r30,r29
bra/xf fail
test2:
; set modular address limits: 0x18 bytes
add r1,r0,0x20000088 ; [start, ...
nop || nop
mvtsys mod_s,r1 || nop
nop || nop
add r1,r0,0x20000070 ; ..., end)
nop || nop
mvtsys mod_e,r1 || nop
; modular autodecrement test
add r30,r0,0x20000088 ; base address = mod_s
ld2w r40,@(r30-,r0) || nop ; after: r30 = ...080
ld2w r40,@(r30-,r0) || nop ; after: r30 = ...078
ld2w r40,@(r30-,r0) || nop ; after: r30 = ...088
add r29,r0,0x20000088 ; expected end address; wrapping around
cmpeq f1,r30,r29
bra/xf fail
ok:
add r2,r0,0
.long 0x0e000004, 0x00f00000
fail:
add r2,r0,47
.long 0x0e000004, 0x00f00000
Go to most recent revision | Compare with Previous | Blame | View Log