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

Subversion Repositories scarts

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

Details | Compare with Previous | View Log


# sh testcase for mov.l r0, @($imm8x4, gbr) -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
 
        .include "compact/testutils.inc"
 
        start
 
setaddr:
        mov #30, r1
        shll8 r1
        ldc r1, gbr
 
init:
        # Build up a distinctive bit pattern.
        mov #1, r0
        shll8 r0
        add #12, r0
        shll8 r0
        add #85, r0
        shll8 r0
        add #170, r0
        # Preserve.
        mov r0, r7
 
        mov.l r0, @(4, gbr)
check:
        # Load it back.
        mov.l @(4, gbr), r0
        cmp/eq r0, r7
        bf wrong
 
okay:
        pass
wrong:
        fail
 

Line No.	Rev	Author	Line
1	26	jlechner	`# sh testcase for mov.l r0, @($imm8x4, gbr) -- 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			`ldc r1, gbr`
14
15			`init:`
16			`# Build up a distinctive bit pattern.`
17			`mov #1, r0`
18			`shll8 r0`
19			`add #12, r0`
20			`shll8 r0`
21			`add #85, r0`
22			`shll8 r0`
23			`add #170, r0`
24			`# Preserve.`
25			`mov r0, r7`
26
27			`mov.l r0, @(4, gbr)`
28			`check:`
29			`# Load it back.`
30			`mov.l @(4, gbr), r0`
31			`cmp/eq r0, r7`
32			`bf wrong`
33
34			`okay:`
35			`pass`
36			`wrong:`
37			`fail`
38

Browse

Tools

Subversion Repositories scarts

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