1
2
3
4 .include "testutils.inc"
5 start
6 clearf nzvc
7 moveq -1,r3
8 .if 1 ;..asm.arch.cris.v32
9 .else
10 setf vc
11 .endif
12 btstq 0,r3
13 test_cc 1 0 0 0
14
15 moveq 2,r3
16 btstq 1,r3
17 test_cc 1 0 0 0
18
19 moveq 4,r3
20 btstq 1,r3
21 test_cc 0 1 0 0
22
23 moveq -1,r3
24 btstq 31,r3
25 test_cc 1 0 0 0
26
27 move.d 0x5a67f19f,r3
28 btstq 12,r3
29 test_cc 1 0 0 0
30
31 move.d 0xda67f19f,r3
32 move.d 29,r4
33 btst r4,r3
34 test_cc 0 0 0 0
35
36 move.d 0xda67f19f,r3
37 move.d 32,r4
38 btst r4,r3
39 test_cc 1 0 0 0
40
41 move.d 0xda67f191,r3
42 move.d 33,r4
43 btst r4,r3
44 test_cc 0 0 0 0
45
46 moveq -1,r3
47 moveq 0,r4
48 btst r4,r3
49 test_cc 1 0 0 0
50
51 moveq 2,r3
52 moveq 1,r4
53 btst r4,r3
54 test_cc 1 0 0 0
55
56 moveq -1,r3
57 moveq 31,r4
58 btst r4,r3
59 test_cc 1 0 0 0
60
61 moveq 4,r3
62 btstq 1,r3
63 test_cc 0 1 0 0
64
65 moveq -1,r3
66 moveq 15,r4
67 btst r4,r3
68 test_cc 1 0 0 0
69
70 move.d 0x5a67f19f,r3
71 moveq 12,r4
72 btst r4,r3
73 test_cc 1 0 0 0
74
75 move.d 0x5a678000,r3
76 moveq 11,r4
77 btst r4,r3
78 test_cc 0 1 0 0
79
80 move.d 0x5a67f19f,r3
81 btst r3,r3
82 test_cc 0 0 0 0
83
84 move.d 0x1111,r3
85 checkr3 1111
86
87 ; check that X gets cleared and that only the NZ flags are touched.
88 move.d 0xff, $r0
89 move $r0, $ccs
90 btst r3,r3
91 move $ccs, $r0
92 and.d 0xff, $r0
93 cmp.d 0xe3, $r0
94 test_cc 0 1 0 0
95
96 quit
97
