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/] [movcal.cgs] - Blame information for rev 157

Details | Compare with Previous | View Log


# sh testcase for movca.l r0, @$rn -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
 
        .include "compact/testutils.inc"
 
        start
 
        .global movcal
movcal:
        mov #1, r0
        rotr r0
        add #128, r0
        mov #40, r1
        shll8 r1
        movca.l r0, @r1
 
        # Load the word back in.
        mov.l @r1, r3
        cmp/eq r0, r3
        bf wrong
 
okay:
        pass
wrong:
        fail
 

Line No.	Rev	Author	Line
1	24	jeremybenn	`# sh testcase for movca.l r0, @$rn -- Asm --`
2			`# mach: all`
3			`# as: -isa=shcompact`
4			`# ld: -m shelf32`
5
6			`.include "compact/testutils.inc"`
7
8			`start`
9
10			`.global movcal`
11			`movcal:`
12			`mov #1, r0`
13			`rotr r0`
14			`add #128, r0`
15			`mov #40, r1`
16			`shll8 r1`
17			`movca.l r0, @r1`
18
19			`# Load the word back in.`
20			`mov.l @r1, r3`
21			`cmp/eq r0, r3`
22			`bf wrong`
23
24			`okay:`
25			`pass`
26			`wrong:`
27			`fail`
28

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [sh64/] [compact/] [movcal.cgs] - Blame information for rev 157