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/] [media/] [shardl.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 shard.l $rm, $rn, $rd -*- Asm -*-
2 
# mach: all
3 
# as: -isa=shmedia
4 
# ld: -m shelf64
5 
 
6 
        .include "media/testutils.inc"
7 
 
8 
        start
9 
 
10 
init:
11 
        pta wrong, tr0
12 
 
13 
shardl1:
14 
        movi 0x1020, r0
15 
        shlli r0, 8, r0
16 
        ori r0, 0x30, r0
17 
        shlli r0, 8, r0
18 
        ori r0, 0x40, r0
19 
        shlli r0, 8, r0
20 
        ori r0, 0x50, r0
21 
        shlli r0, 8, r0
22 
        ori r0, 0x60, r0
23 
        shlli r0, 8, r0
24 
        ori r0, 0x70, r0
25 
        shlli r0, 8, r0
26 
        ori r0, 0x80, r0
27 
 
28 
        movi 1, r1
29 
        shard.l r0, r1, r0
30 
        shard.l r0, r1, r0
31 
        shard.l r0, r1, r0
32 
        shard.l r0, r1, r0
33 
        shard.l r0, r1, r0
34 
        shard.l r0, r1, r0
35 
        shard.l r0, r1, r0
36 
        shard.l r0, r1, r0
37 
        movi  20, r1
38 
        shard.l r0, r1, r0
39 
        bnei r0, 5, tr0
40 
 
41 
okay:
42 
        pass
43 
 
44 
wrong:
45 
        fail

powered by: WebSVN 2.1.0

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