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/] [or.cgs] - Blame information for rev 437

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

Line No. Rev Author Line
1 24 jeremybenn
# sh testcase for or $rm64, $rn64 -*- Asm -*-
2
# mach: all
3
# as: -isa=shcompact
4
# ld: -m shelf32
5
 
6
        .include "compact/testutils.inc"
7
 
8
        start
9
 
10
        .global or
11
or:
12
        mov #1, r0
13
        rotr r0
14
        mov #1, r1
15
        or r0, r1
16
 
17
        mov #1, r7
18
        rotr r7
19
        add #1, r7
20
        cmp/eq r7, r1
21
        bf wrong
22
 
23
        .global or2
24
or2:
25
        mov #85, r0
26
        shll16 r0
27
        shll8 r0
28
        mov #85, r1
29
        shll8 r1
30
        or r0, r1
31
 
32
        mov #85, r7
33
        shll16 r7
34
        add #85 ,r7
35
        shll8 r7
36
        cmp/eq r1, r7
37
        bf wrong
38
 
39
okay:
40
        pass
41
 
42
wrong:
43
        fail

powered by: WebSVN 2.1.0

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