URL https://opencores.org/ocsvn/scarts/scarts/trunk

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [movl8.cgs] - Blame information for rev 26

Details | Compare with Previous | View Log


# sh testcase for mov.l @(r0, $rm), $rn -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
 
        .include "compact/testutils.inc"
 
        start
        mov #0, r0
        mov #30, r1
        shll8 r1
        # Store something there first.
        mov #170, r3
        mov.l r3, @(r0, r1)
check:
        # Load it back.
        mov.l @(r0, r1), r2
        cmp/eq r2, r3
        bf wrong
 
okay:
        pass
wrong:
        fail

Line No.	Rev	Author	Line
1	26	jlechner	`# sh testcase for mov.l @(r0, $rm), $rn -- Asm --`
2			`# mach: all`
3			`# as: -isa=shcompact`
4			`# ld: -m shelf32`
5
6			`.include "compact/testutils.inc"`
7
8			`start`
9			`mov #0, r0`
10			`mov #30, r1`
11			`shll8 r1`
12			`# Store something there first.`
13			`mov #170, r3`
14			`mov.l r3, @(r0, r1)`
15			`check:`
16			`# Load it back.`
17			`mov.l @(r0, r1), r2`
18			`cmp/eq r2, r3`
19			`bf wrong`
20
21			`okay:`
22			`pass`
23			`wrong:`
24			`fail`

Browse

Tools

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [movl8.cgs] - Blame information for rev 26