URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [rotcl.cgs] - Blame information for rev 26

Details | Compare with Previous | View Log


# sh testcase for rotcl $rn -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
 
        .include "compact/testutils.inc"
 
        start
 
        .global rotcl
 
rotcl:
        clrt
        mov #1, r1
        rotcl r1
        assert r1, #2
        clrt
        rotcl r1
        assert r1, #4
        clrt
        rotcl r1
        assert r1, #8
        clrt
        rotcl r1
        assert r1, #16
        clrt
        rotcl r1
        assert r1, #32
        clrt
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        bf wrong
        rotcl r1
        assert r1, #1
 
        bra trotcl
        nop
 
wrong:
        fail
 
trotcl:
        sett
        mov #1, r1
        rotcl r1
        assert r1, #3
        clrt
        rotcl r1
        assert r1, #6
        clrt
        rotcl r1
        assert r1, #12
        clrt
        rotcl r1
        assert r1, #24
        clrt
        rotcl r1
        assert r1, #48
        clrt
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        rotcl r1
        bf wrong2
        assert r1, #1
        rotcl r1
        rotcl r1
 
okay:
        pass
wrong2:
        fail

Line No.	Rev	Author	Line
1	26	jlechner	`# 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`

Browse

Tools

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [rotcl.cgs] - Blame information for rev 26