OSDN Git Service

r284@cf-ppc-macosx: monabuilder | 2008-12-07 10:57:41 +0900
[pf3gnuchains/pf3gnuchains3x.git] / sim / testsuite / sim / sh64 / compact / rotcl.cgs
1 # sh testcase for rotcl $rn -*- Asm -*-
2 # mach: all
3 # as: -isa=shcompact
4 # ld: -m shelf32
5
6         .include "compact/testutils.inc"
7
8         start
9
10         .global rotcl
11
12 rotcl:
13         clrt
14         mov #1, r1
15         rotcl r1
16         assert r1, #2
17         clrt
18         rotcl r1
19         assert r1, #4
20         clrt
21         rotcl r1
22         assert r1, #8
23         clrt
24         rotcl r1
25         assert r1, #16
26         clrt
27         rotcl r1
28         assert r1, #32
29         clrt
30         rotcl r1
31         rotcl r1
32         rotcl r1
33         rotcl r1
34         rotcl r1
35         rotcl r1
36         rotcl r1
37         rotcl r1
38         rotcl r1
39         rotcl r1
40         rotcl r1
41         rotcl r1
42         rotcl r1
43         rotcl r1
44         rotcl r1
45         rotcl r1
46         rotcl r1
47         rotcl r1
48         rotcl r1
49         rotcl r1
50         rotcl r1
51         rotcl r1
52         rotcl r1
53         rotcl r1
54         rotcl r1
55         rotcl r1
56         rotcl r1
57         bf wrong
58         rotcl r1
59         assert r1, #1
60
61         bra trotcl
62         nop
63
64 wrong:
65         fail
66
67 trotcl:
68         sett
69         mov #1, r1
70         rotcl r1
71         assert r1, #3
72         clrt
73         rotcl r1
74         assert r1, #6
75         clrt
76         rotcl r1
77         assert r1, #12
78         clrt
79         rotcl r1
80         assert r1, #24
81         clrt
82         rotcl r1
83         assert r1, #48
84         clrt
85         rotcl r1
86         rotcl r1
87         rotcl r1
88         rotcl r1
89         rotcl r1
90         rotcl r1
91         rotcl r1
92         rotcl r1
93         rotcl r1
94         rotcl r1
95         rotcl r1
96         rotcl r1
97         rotcl r1
98         rotcl r1
99         rotcl r1
100         rotcl r1
101         rotcl r1
102         rotcl r1
103         rotcl r1
104         rotcl r1
105         rotcl r1
106         rotcl r1
107         rotcl r1
108         rotcl r1
109         rotcl r1
110         rotcl r1
111         rotcl r1
112         rotcl r1
113         bf wrong2
114         assert r1, #1
115         rotcl r1
116         rotcl r1
117
118 okay:   
119         pass
120 wrong2:
121         fail