OpenCores
URL https://opencores.org/ocsvn/openrisc_me/openrisc_me/trunk

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [gdb-6.8/] [sim/] [testsuite/] [sim/] [h8300/] [bra.s] - Blame information for rev 225

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

Line No. Rev Author Line
1 24 jeremybenn
# Hitachi H8 testcase 'bra'
2
# mach(): all
3
# as(h8300):    --defsym sim_cpu=0
4
# as(h8300h):   --defsym sim_cpu=1
5
# as(h8300s):   --defsym sim_cpu=2
6
# as(h8sx):     --defsym sim_cpu=3
7
# ld(h8300h):   -m h8300helf
8
# ld(h8300s):   -m h8300self
9
# ld(h8sx):     -m h8300sxelf
10
 
11
        .include "testutils.inc"
12
 
13
        start
14
.if (sim_cpu == h8sx)
15
        .data
16
        .align 4
17
disp8:  .long   tgt_reg8
18
disp16: .long   tgt_reg16
19
disp32: .long   tgt_reg32
20
dslot:  .byte   0
21
        .text
22
.endif
23
 
24
bra_8:
25
        set_grs_a5a5            ; Fill all general regs with a fixed pattern
26
        set_ccr_zero
27
 
28
        ;;  bra dd:8            ; 8-bit displacement
29
        bra tgt_8:8
30
;;;     .word   0x40xx          ; where "xx" is tgt_8 - '.'.
31
        fail
32
 
33
tgt_8:
34
        test_cc_clear
35
        test_gr_a5a5 0           ; Make sure other general regs not disturbed
36
        test_gr_a5a5 1
37
        test_gr_a5a5 2
38
        test_gr_a5a5 3
39
        test_gr_a5a5 4
40
        test_gr_a5a5 5
41
        test_gr_a5a5 6
42
        test_gr_a5a5 7
43
 
44
.if (sim_cpu)                   ; not available in h8/300 mode
45
bra_16:
46
        set_grs_a5a5            ; Fill all general regs with a fixed pattern
47
        set_ccr_zero
48
 
49
        ;;  bra dd:16           ; 16-bit displacement
50
        bra tgt_24:16   ; NOTE: hard-coded to avoid relaxing.
51
;;;     .word 0x5800
52
;;;     .word tgt_24 - .
53
        fail
54
 
55
tgt_24:
56
        test_cc_clear
57
        test_gr_a5a5 0           ; Make sure other general regs not disturbed
58
        test_gr_a5a5 1
59
        test_gr_a5a5 2
60
        test_gr_a5a5 3
61
        test_gr_a5a5 4
62
        test_gr_a5a5 5
63
        test_gr_a5a5 6
64
        test_gr_a5a5 7
65
.endif
66
 
67
.if     (sim_cpu == h8sx)
68
bra_reg8:
69
        set_grs_a5a5            ; Fill all general regs with a fixed pattern
70
        set_ccr_zero
71
 
72
        ;;  bra rn.b            ; 8-bit register indirect
73
        sub.l   #src8, @disp8
74
        mov.l   @disp8, er5
75
        bra     r5l.b
76
;;;     .word   0x5955
77
src8:   fail
78
 
79
tgt_reg8:
80
        test_cc_clear
81
        test_gr_a5a5 0           ; Make sure other general regs not disturbed
82
        test_gr_a5a5 1
83
        test_gr_a5a5 2
84
        test_gr_a5a5 3
85
        test_gr_a5a5 4
86
;;;     test_h_gr32 tgt_reg8 er5
87
        test_gr_a5a5 6
88
        test_gr_a5a5 7
89
 
90
bra_reg16:
91
        set_grs_a5a5            ; Fill all general regs with a fixed pattern
92
        set_ccr_zero
93
 
94
        ;;  bra rn.w            ; 16-bit register indirect
95
        sub.l   #src16, @disp16
96
        mov.l   @disp16, er5
97
        bra     r5.w
98
;;;     .word   0x5956
99
src16:  fail
100
 
101
tgt_reg16:
102
        test_cc_clear
103
        test_gr_a5a5 0           ; Make sure other general regs not disturbed
104
        test_gr_a5a5 1
105
        test_gr_a5a5 2
106
        test_gr_a5a5 3
107
        test_gr_a5a5 4
108
;;;     test_h_gr32 tgt_reg16 er5
109
        test_gr_a5a5 6
110
        test_gr_a5a5 7
111
 
112
bra_reg32:
113
        set_grs_a5a5            ; Fill all general regs with a fixed pattern
114
        set_ccr_zero
115
 
116
        ;;  bra ern             ; 32-bit register indirect
117
        sub.l   #src32, @disp32
118
        mov.l   @disp32, er5
119
        bra     er5.l
120
;;;     .word   0x5957
121
src32:  fail
122
 
123
tgt_reg32:
124
        test_cc_clear
125
        test_gr_a5a5 0           ; Make sure other general regs not disturbed
126
        test_gr_a5a5 1
127
        test_gr_a5a5 2
128
        test_gr_a5a5 3
129
        test_gr_a5a5 4
130
;;;     test_gr_a5a5 5
131
        test_gr_a5a5 6
132
        test_gr_a5a5 7
133
 
134
bra_s:  set_grs_a5a5
135
        set_ccr_zero
136
 
137
        bra/s   tgt_post_delay
138
;;;     .word   0x4017
139
        ;; The following instruction is in the delay slot, and should execute.
140
        mov.b   #1, @dslot
141
        ;; After this, the next instructions should not execute.
142
        fail
143
 
144
tgt_post_delay:
145
        test_cc_clear
146
        cmp.b   #0, @dslot       ; Should be non-zero if delay slot executed.
147
        bne     dslot_ok
148
        fail
149
 
150
dslot_ok:
151
        test_gr_a5a5 0           ; Make sure all general regs not disturbed
152
        test_gr_a5a5 1
153
        test_gr_a5a5 2
154
        test_gr_a5a5 3
155
        test_gr_a5a5 4
156
        test_gr_a5a5 5
157
        test_gr_a5a5 6
158
        test_gr_a5a5 7
159
 
160
.endif
161
 
162
        pass
163
        exit 0
164
 
165
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.