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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [movl7.cgs] - Blame information for rev 840

Details | Compare with Previous | View Log

Line No. Rev Author Line
1 24 jeremybenn
# sh testcase for mov.l @$rm+, $rn -*- Asm -*-
2
# mach: all
3
# as: -isa=shcompact
4
# ld: -m shelf32
5
 
6
        .include "compact/testutils.inc"
7
 
8
        start
9
 
10
        mov #30, r0
11
        shll8 r0
12
        # Preserve address.
13
        mov r0, r7
14
        # Store something first.
15
        mov #170, r3
16
        mov.l r3, @r0
17
 
18
        mov.l @r0+, r1
19
check:
20
        cmp/eq r1, r3
21
        bf wrong
22
 
23
        # Ensure address is post-incremented.
24
        add #4, r7
25
        cmp/eq r7, r0
26
        bf wrong
27
 
28
equal:
29
        # Test rm = rn.
30
        mov #30, r0
31
        shll8 r0
32
        mov.l @r0+, r0
33
 
34
okay:
35
        pass
36
wrong:
37
        fail

powered by: WebSVN 2.1.0

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