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

Subversion Repositories scarts

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

Details | Compare with Previous | View Log


# sh testcase for lds.l @${rn}+, pr -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
 
        .include "compact/testutils.inc"
 
        start
 
        .global ldsl_pr
ldsl_pr:
        mov #40, r0
        shll8 r0
        # Preserve address.
        mov r0, r1
        lds.l @r0+, pr
 
        # Add 4 to saved address (r1).
        # Then compare with r0.
        add #4, r1
        cmp/eq r0, r1
        bf wrong
 
okay:
        pass
 
wrong:
        fail

Line No.	Rev	Author	Line
1	26	jlechner	`# sh testcase for lds.l @${rn}+, pr -- Asm --`
2			`# mach: all`
3			`# as: -isa=shcompact`
4			`# ld: -m shelf32`
5
6			`.include "compact/testutils.inc"`
7
8			`start`
9
10			`.global ldsl_pr`
11			`ldsl_pr:`
12			`mov #40, r0`
13			`shll8 r0`
14			`# Preserve address.`
15			`mov r0, r1`
16			`lds.l @r0+, pr`
17
18			`# Add 4 to saved address (r1).`
19			`# Then compare with r0.`
20			`add #4, r1`
21			`cmp/eq r0, r1`
22			`bf wrong`
23
24			`okay:`
25			`pass`
26
27			`wrong:`
28			`fail`

Browse

Tools

Subversion Repositories scarts

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