|
|
1.1 root 1:
2:
3:
4: .globl _movwall
5: _movwall:
6: movl $0xaabbccdd,l1
7: movl $0xffffffff,l2
8: callf $4,_setjmp /* save context for error return */
9: movab _movwall,_stpc /* save subtest starting address */
10: movl $1,_subtst /* subtest number */
11: movl $1,_no_opr /* number of operands in use */
12: movl l1,_opr /* first operand */
13: 0: movw l1,l2
14: cmpl $0xaabbffff,l2
15: jeql nxt1
16: bbs $0,_scoplp,0b /* if set scope loop on error */
17: movl $1,_ercode /* error code data miscompare */
18: movl l2,_actual /* actual data */
19: movl $0xaabbffff,_expected /* expected data */
20: jmp *badrtn
21: nxt1:
22: bbs $0,_force_lp,0b /* if set loop on last subtest */
23: am2: callf $4,_setjmp /* save context for error return */
24: movab am2,_stpc /* save subtest starting address */
25: movl $2,_subtst /* subtest number */
26: 0: movl $0xffffffff,l2
27: movw l1,l2+2
28: cmpl $0xffffaabb,l2
29: jeql nxt2
30: bbs $0,_scoplp,0b /* if set scope loop on error */
31: movl $1,_ercode /* error code data miscompare */
32: movl l2,_actual /* actual data */
33: movl $0xffffaabb,_expected /* expected data */
34: jmp *badrtn
35: nxt2:
36: bbs $0,_force_lp,0b /* if set loop on last subtest */
37: am3: callf $4,_setjmp /* save context for error return */
38: movab am3,_stpc /* save subtest starting address */
39: movl $3,_subtst /* subtest number */
40: 0: movl $0xffffffff,l2
41: movw l1+2,l2
42: cmpl $0xccddffff,l2
43: jeql nxt3
44: bbs $0,_scoplp,0b /* if set scope loop on error */
45: movl $1,_ercode /* error code data miscompare */
46: movl l2,_actual /* actual data */
47: movl $0xccddffff,_expected /* expected data */
48: jmp *badrtn
49: nxt3:
50: bbs $0,_force_lp,0b /* if set loop on last subtest */
51: am4: callf $4,_setjmp /* save context for error return */
52: movab am4,_stpc /* save subtest starting address */
53: movl $4,_subtst /* subtest number */
54: 0: movl $0xffffffff,l2
55: movw l1+2,l2+2
56: cmpl $0xffffccdd,l2
57: jeql nxt4
58: bbs $0,_scoplp,0b /* if set scope loop on error */
59: movl $1,_ercode /* error code data miscompare */
60: movl l2,_actual /* actual data */
61: movl $0xffffccdd,_expected /* expected data */
62: jmp *badrtn
63: nxt4:
64: bbs $0,_force_lp,0b /* if set loop on last subtest */
65: am5: callf $4,_setjmp /* save context for error return */
66: movab am5,_stpc /* save subtest starting address */
67: movl $5,_subtst /* subtest number */
68: 0: movw l1,l1+2
69: cmpl $0xaabbaabb,l1
70: jeql nxt5
71: bbs $0,_scoplp,0b /* if set scope loop on error */
72: movl $1,_ercode /* error code data miscompare */
73: movl l1,_actual /* actual data */
74: movl $0xaabbaabb,_expected /* expected data */
75: jmp *badrtn
76: nxt5:
77: bbs $0,_force_lp,0b /* if set loop on last subtest */
78: am6: callf $4,_setjmp /* save context for error return */
79: movab am6,_stpc /* save subtest starting address */
80: movl $6,_subtst /* subtest number */
81: 0: movl $0xaabbccdd,l1
82: movw l1+2,l1
83: cmpl $0xccddccdd,l1
84: jeql aldn
85: bbs $0,_scoplp,0b /* if set scope loop on error */
86: movl $1,_ercode /* error code data miscompare */
87: movl l1,_actual /* actual data */
88: movl $0xccddccdd,_expected /* expected data */
89: jmp *badrtn
90:
91:
92: aldn: bbs $0,_force_lp,0b /* if set loop on last subtest */
93: jmp *return /* good, return to monitor */
94:
95:
96: .align 2
97: l1:
98: .long 0xaabbccdd
99: l2:
100: .long 0xffffffff
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.