summaryrefslogtreecommitdiffstats
path: root/tests/cris/check_btst.s
blob: e39fc8f4d66d87ebbfde68fea0311900232db270 (plain)
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
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
# mach: crisv0 crisv3 crisv8 crisv10 crisv32
# output: 1111\n

 .include "testutils.inc"
 start
 clearf nzvc
 moveq -1,r3
 .if 1 ;..asm.arch.cris.v32
 .else
 setf vc
 .endif
 btstq 0,r3
 test_cc 1 0 0 0

 moveq 2,r3
 btstq 1,r3
 test_cc 1 0 0 0

 moveq 4,r3
 btstq 1,r3
 test_cc 0 1 0 0

 moveq -1,r3
 btstq 31,r3
 test_cc 1 0 0 0

 move.d 0x5a67f19f,r3
 btstq 12,r3
 test_cc 1 0 0 0

 move.d 0xda67f19f,r3
 move.d 29,r4
 btst r4,r3
 test_cc 0 0 0 0

 move.d 0xda67f19f,r3
 move.d 32,r4
 btst r4,r3
 test_cc 1 0 0 0

 move.d 0xda67f191,r3
 move.d 33,r4
 btst r4,r3
 test_cc 0 0 0 0

 moveq -1,r3
 moveq 0,r4
 btst r4,r3
 test_cc 1 0 0 0

 moveq 2,r3
 moveq 1,r4
 btst r4,r3
 test_cc 1 0 0 0

 moveq -1,r3
 moveq 31,r4
 btst r4,r3
 test_cc 1 0 0 0

 moveq 4,r3
 btstq 1,r3
 test_cc 0 1 0 0

 moveq -1,r3
 moveq 15,r4
 btst r4,r3
 test_cc 1 0 0 0

 move.d 0x5a67f19f,r3
 moveq 12,r4
 btst r4,r3
 test_cc 1 0 0 0

 move.d 0x5a678000,r3
 moveq 11,r4
 btst r4,r3
 test_cc 0 1 0 0

 move.d 0x5a67f19f,r3
 btst r3,r3
 test_cc 0 0 0 0

 move.d 0x1111,r3
 checkr3 1111

 ; check that X gets cleared and that only the NZ flags are touched.
 move.d	0xff, $r0
 move $r0, $ccs
 btst r3,r3
 move $ccs, $r0
 and.d 0xff, $r0
 cmp.d	0xe3, $r0
 test_cc 0 1 0 0

 quit
OpenPOWER on IntegriCloud