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

Subversion Repositories scarts

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

Details | Compare with Previous | View Log


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

Line No.	Rev	Author	Line
1	26	jlechner	`# sh testcase for sts fpscr, $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 sts_fpscr`
11			`sts_fpscr:`
12			`sts fpscr, r0`
13			`mov #42, r0`
14			`lds r0, fpscr`
15			`sts fpscr, r1`
16			`cmp/eq r0, r1`
17			`bf wrong`
18
19			`okay:`
20			`pass`
21			`wrong:`
22			`fail`
23

Browse

Tools

Subversion Repositories scarts

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