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/] [lds-mach.cgs] - Blame information for rev 280

Go to most recent revision | Details | Compare with Previous | View Log


# sh testcase for lds $rn, mach
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
 
        .include "compact/testutils.inc"
 
        start
 
        .global lds_mach
lds_mach:
        mov #41, r0
        shll8 r0
        lds r0, mach
readback:
        sts mach, r1
        cmp/eq r0, r1
        bf wrong
 
okay:
        pass
wrong:
        fail

Line No.	Rev	Author	Line
1	24	jeremybenn	`# sh testcase for lds $rn, mach`
2			`# mach: all`
3			`# as: -isa=shcompact`
4			`# ld: -m shelf32`
5
6			`.include "compact/testutils.inc"`
7
8			`start`
9
10			`.global lds_mach`
11			`lds_mach:`
12			`mov #41, r0`
13			`shll8 r0`
14			`lds r0, mach`
15			`readback:`
16			`sts mach, r1`
17			`cmp/eq r0, r1`
18			`bf wrong`
19
20			`okay:`
21			`pass`
22			`wrong:`
23			`fail`

Browse

Tools

Subversion Repositories openrisc_me

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