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

Subversion Repositories scarts

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

Details | Compare with Previous | View Log


# sh testcase for dt $rn -*- Asm -*-
# mach: all
# as: -isa=shcompact
# ld: -m shelf32
 
        .include "compact/testutils.inc"
 
        start
 
        .global dt
dt:
        mov #3, r0
        dt r0
        bt wrong
        assert r0, #2
 
        mov #1, r0
        dt r0
        bf wrong
        assert r0, #0
 
        mov #0, r0
        dt r0
        bt wrong
        mov #0, r7
        not r7, r7
        cmp/eq r7, r0
        bf wrong
 
        mov #1, r0
        neg r0, r0
        dt r0
        mov #1, r7
        not r7, r7
        cmp/eq r7, r0
        bf wrong
 
okay:
        pass
 
wrong:
        fail

Line No.	Rev	Author	Line
1	26	jlechner	`# sh testcase for dt $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 dt`
11			`dt:`
12			`mov #3, r0`
13			`dt r0`
14			`bt wrong`
15			`assert r0, #2`
16
17			`mov #1, r0`
18			`dt r0`
19			`bf wrong`
20			`assert r0, #0`
21
22			`mov #0, r0`
23			`dt r0`
24			`bt wrong`
25			`mov #0, r7`
26			`not r7, r7`
27			`cmp/eq r7, r0`
28			`bf wrong`
29
30			`mov #1, r0`
31			`neg r0, r0`
32			`dt r0`
33			`mov #1, r7`
34			`not r7, r7`
35			`cmp/eq r7, r0`
36			`bf wrong`
37
38			`okay:`
39			`pass`
40
41			`wrong:`
42			`fail`

Browse

Tools

Subversion Repositories scarts

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