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

Subversion Repositories scarts

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

Details | Compare with Previous | View Log


# sh testcase for mov.l @($imm8x4, pc), $rn -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
 
        .include "compact/testutils.inc"
 
        start
 
init:
        # Build up a distinctive bit pattern.
        mov #1, r2
        shll8 r2
        add #12, r2
        shll8 r2
        add #85, r2
        shll8 r2
        add #170, r2
 
        # Store to memory.
        mov #16, r1
        shll8 r1
        add #32, r1
        mov.l r2, @r1
check:
        # Read it back.
        mov.l @(12, pc), r0
        cmp/eq r2, r0
        bf wrong
 
okay:
        pass
wrong:
        fail

Line No.	Rev	Author	Line
1	26	jlechner	`# sh testcase for mov.l @($imm8x4, pc), $rn -- Asm --`
2			`# mach: all`
3			`# as: -isa=shcompact`
4			`# ld: -m shelf32`
5
6			`.include "compact/testutils.inc"`
7
8			`start`
9
10			`init:`
11			`# Build up a distinctive bit pattern.`
12			`mov #1, r2`
13			`shll8 r2`
14			`add #12, r2`
15			`shll8 r2`
16			`add #85, r2`
17			`shll8 r2`
18			`add #170, r2`
19
20			`# Store to memory.`
21			`mov #16, r1`
22			`shll8 r1`
23			`add #32, r1`
24			`mov.l r2, @r1`
25			`check:`
26			`# Read it back.`
27			`mov.l @(12, pc), r0`
28			`cmp/eq r2, r0`
29			`bf wrong`
30
31			`okay:`
32			`pass`
33			`wrong:`
34			`fail`

Browse

Tools

Subversion Repositories scarts

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