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
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
|
; 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
|
