OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [rotl.cgs] - Blame information for rev 280

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 24 jeremybenn 
# sh testcase for rotl $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 rotl
11 
rotl:
12 
        mov #1, r1
13 
        rotl r1
14 
        assert r1, #2
15 
        rotl r1
16 
        assert r1, #4
17 
        rotl r1
18 
        assert r1, #8
19 
        rotl r1
20 
        assert r1, #16
21 
        rotl r1
22 
        assert r1, #32
23 
        rotl r1
24 
        assert r1, #64
25 
        rotl r1
26 
        rotl r1
27 
        rotl r1
28 
        rotl r1
29 
        rotl r1
30 
        rotl r1
31 
        rotl r1
32 
        rotl r1
33 
        rotl r1
34 
        rotl r1
35 
        rotl r1
36 
        rotl r1
37 
        rotl r1
38 
        rotl r1
39 
        rotl r1
40 
        rotl r1
41 
        rotl r1
42 
        rotl r1
43 
        rotl r1
44 
        rotl r1
45 
        rotl r1
46 
        rotl r1
47 
        rotl r1
48 
        rotl r1
49 
        rotl r1
50 
        rotl r1
51 
        bf wrong
52 
        assert r1, #1
53 
        rotl r1
54 
        rotl r1
55 
        rotl r1
56 
        assert r1, #8
57 
 
58 
okay:
59 
        pass
60 
 
61 
wrong:
62 
        fail

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.