|
|
1.1 root 1:
2: .include "testutils.inc"
3:
4: start
5:
6: moveq -1, $r0
7: moveq 0, $r1
8: addq 1, $r0
9: ax
10: addq 0, $r1
11:
12: move.d $r0, $r3
13: checkr3 0
14: move.d $r1, $r3
15: checkr3 1
16:
17: move.d 0, $r0
18: moveq -1, $r1
19: subq 1, $r0
20: ax
21: subq 0, $r1
22:
23: move.d $r0, $r3
24: checkr3 ffffffff
25: move.d $r1, $r3
26: checkr3 fffffffe
27:
28:
29: moveq -1, $r0
30: moveq -1, $r1
31: cmpq -1, $r0
32: ax
33: cmpq -1, $r1
34: beq 1f
35: nop
36: fail
37: 1:
38: cmpq 0, $r0
39: ax
40: cmpq -1, $r1
41: bne 1f
42: nop
43: fail
44: 1:
45:
46: ;; test for broken X sequence, run it several times.
47: moveq 8, $r0
48: 1:
49: moveq 0, $r3
50: move.d $r0, $r1
51: andq 1, $r1
52: lslq 4, $r1
53: moveq 1, $r2
54: or.d $r1, $r2
55: ba 2f
56: move $r2, $ccs
57: 2:
58: addq 0, $r3
59: move.d $r0, $r4
60: move.d $r1, $r5
61: move.d $r2, $r6
62: move.d $r3, $r7
63: lsrq 4, $r1
64: move.d $r1, $r8
65: xor $r1, $r3
66: checkr3 0
67: subq 1, $r0
68: bne 1b
69: nop
70:
71: pass
72: quit
This archive runs on limited infrastructure. Preserving old code on modern bandwidth. Automated agents are requested to crawl responsibly.