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

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [m32r/] [testutils.inc] - Blame information for rev 26

Details | Compare with Previous | View Log


# r0-r3 are used as tmps, consider them call clobbered by these macros.
 
        .macro start
        .data
failmsg:
        .ascii "fail\n"
passmsg:
        .ascii "pass\n"
        .text
        .global _start
_start:
        .endm
 
        .macro exit rc
        ldi8 r1, \rc
        ldi8 r0, #1
        trap #0
        .endm
 
        .macro pass
        ldi8 r3, 5
        ld24 r2, passmsg
        ldi8 r1, 1
        ldi8 r0, 5
        trap #0
        exit 0
        .endm
 
        .macro fail
        ldi8 r3, 5
        ld24 r2, failmsg
        ldi8 r1, 1
        ldi8 r0, 5
        trap #0
        exit 1
        .endm
 
        .macro mvi_h_gr reg, val
        .if (\val >= -128) && (\val <= 127)
        ldi8 \reg, \val
        .else
        seth \reg, high(\val)
        or3 \reg, \reg, low(\val)
        .endif
        .endm
 
        .macro mvaddr_h_gr reg, addr
        seth \reg, high(\addr)
        or3 \reg, \reg, low(\addr)
        .endm
 
# Other macros know this only clobbers r0.
        .macro test_h_gr reg, val
        mvaddr_h_gr r0, \val
        beq \reg, r0, test_gr\@
        fail
test_gr\@:
        .endm
 
        .macro mvi_h_condbit val
        ldi8 r0, 0
        ldi8 r1, 1
        .if \val
        cmp r0, r1
        .else
        cmp r1, r0
        .endif
        .endm
 
        .macro test_h_condbit val
        .if \val
        bc test_c1\@
        fail
test_c1\@:
        .else
        bnc test_c0\@
        fail
test_c0\@:
        .endif
        .endm
 
        .macro mvi_h_accum0 hi, lo
        mvi_h_gr r0, \hi
        mvtachi r0
        mvi_h_gr r0, \lo
        mvtaclo r0
        .endm
 
        .macro test_h_accum0 hi, lo
        mvfachi r1
        test_h_gr r1, \hi
        mvfaclo r1
        test_h_gr r1, \lo
        .endm
 

Line No.	Rev	Author	Line
1	26	jlechner	`# r0-r3 are used as tmps, consider them call clobbered by these macros.`
2
3			`.macro start`
4			`.data`
5			`failmsg:`
6			`.ascii "fail\n"`
7			`passmsg:`
8			`.ascii "pass\n"`
9			`.text`
10			`.global _start`
11			`_start:`
12			`.endm`
13
14			`.macro exit rc`
15			`ldi8 r1, \rc`
16			`ldi8 r0, #1`
17			`trap #0`
18			`.endm`
19
20			`.macro pass`
21			`ldi8 r3, 5`
22			`ld24 r2, passmsg`
23			`ldi8 r1, 1`
24			`ldi8 r0, 5`
25			`trap #0`
26			`exit 0`
27			`.endm`
28
29			`.macro fail`
30			`ldi8 r3, 5`
31			`ld24 r2, failmsg`
32			`ldi8 r1, 1`
33			`ldi8 r0, 5`
34			`trap #0`
35			`exit 1`
36			`.endm`
37
38			`.macro mvi_h_gr reg, val`
39			`.if (\val >= -128) && (\val <= 127)`
40			`ldi8 \reg, \val`
41			`.else`
42			`seth \reg, high(\val)`
43			`or3 \reg, \reg, low(\val)`
44			`.endif`
45			`.endm`
46
47			`.macro mvaddr_h_gr reg, addr`
48			`seth \reg, high(\addr)`
49			`or3 \reg, \reg, low(\addr)`
50			`.endm`
51
52			`# Other macros know this only clobbers r0.`
53			`.macro test_h_gr reg, val`
54			`mvaddr_h_gr r0, \val`
55			`beq \reg, r0, test_gr\@`
56			`fail`
57			`test_gr\@:`
58			`.endm`
59
60			`.macro mvi_h_condbit val`
61			`ldi8 r0, 0`
62			`ldi8 r1, 1`
63			`.if \val`
64			`cmp r0, r1`
65			`.else`
66			`cmp r1, r0`
67			`.endif`
68			`.endm`
69
70			`.macro test_h_condbit val`
71			`.if \val`
72			`bc test_c1\@`
73			`fail`
74			`test_c1\@:`
75			`.else`
76			`bnc test_c0\@`
77			`fail`
78			`test_c0\@:`
79			`.endif`
80			`.endm`
81
82			`.macro mvi_h_accum0 hi, lo`
83			`mvi_h_gr r0, \hi`
84			`mvtachi r0`
85			`mvi_h_gr r0, \lo`
86			`mvtaclo r0`
87			`.endm`
88
89			`.macro test_h_accum0 hi, lo`
90			`mvfachi r1`
91			`test_h_gr r1, \hi`
92			`mvfaclo r1`
93			`test_h_gr r1, \lo`
94			`.endm`
95

Browse

Tools

Subversion Repositories scarts

[/] [scarts/] [trunk/] [toolchain/] [scarts-gdb/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [m32r/] [testutils.inc] - Blame information for rev 26