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/] [movl5.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 mov.l $rm, @($imm4x4, $rn) -*- Asm -*-
2
# mach: all
3
# as: -isa=shcompact
4
# ld: -m shelf32
5
 
6
        .include "compact/testutils.inc"
7
 
8
        start
9
 
10
setaddr:
11
        mov #30, r1
12
        shll8 r1
13
 
14
init:
15
        # Build up a distinctive bit pattern.
16
        mov #1, r0
17
        shll8 r0
18
        add #12, r0
19
        shll8 r0
20
        add #85, r0
21
        shll8 r0
22
        add #170, r0
23
        # Preserve.
24
        mov r0, r7
25
 
26
        mov.l r0, @(4, r1)
27
check:
28
        # Load it back.
29
        mov.l @(4, r1), r0
30
        cmp/eq r7, r0
31
        bf wrong
32
 
33
okay:
34
        pass
35
 
36
wrong:
37
        fail

powered by: WebSVN 2.1.0

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