1 # Copyright (C) 2003, 2007, 2008, 2009, 2010, 2011
2 # Free Software Foundation, Inc.
4 # This program is free software; you can redistribute it and/or modify
5 # it under the terms of the GNU General Public License as published by
6 # the Free Software Foundation; either version 3 of the License, or
7 # (at your option) any later version.
9 # This program is distributed in the hope that it will be useful,
10 # but WITHOUT ANY WARRANTY; without even the implied warranty of
11 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
12 # GNU General Public License for more details.
14 # You should have received a copy of the GNU General Public License
15 # along with this program. If not, see <http://www.gnu.org/licenses/>.
17 # This file was written by Michael Snyder (msnyder@redhat.com)
23 if ![istarget "h8300*-*-*"] {
24 verbose "Tests ignored for all but h8300s based targets."
29 set testfile "t07_ari3"
30 set srcfile ${srcdir}/${subdir}/${testfile}.s
31 set objfile ${objdir}/${subdir}/${testfile}.o
32 set binfile ${objdir}/${subdir}/${testfile}.x
35 set link-flags "-m h8300sxelf";
38 if {[target_assemble $srcfile $objfile "${asm-flags}"] != ""} then {
43 if {[target_link $objfile $binfile "${link-flags}"] != ""} then {
49 gdb_reinitialize_dir $srcdir/$subdir
52 gdb_test "x /i start" "neg.b\tr1h" \
54 gdb_test "x" "neg.b\t@er1" \
56 gdb_test "x" "neg.b\t@\\(0x3(:2|),er1\\)" \
58 gdb_test "x" "neg.b\t@er1\\+" \
60 gdb_test "x" "neg.b\t@-er1" \
62 gdb_test "x" "neg.b\t@\\+er1" \
64 gdb_test "x" "neg.b\t@er1-" \
66 gdb_test "x" "neg.b\t@\\(0x1234(:16|),er1\\)" \
67 "neg.b @(0x1234:16,er1)"
68 gdb_test "x" "neg.b\t@\\(0x12345678(:32|),er1\\)" \
69 "neg.b @(0x12345678:32,er1)"
70 gdb_test "x" "neg.b\t@\\(0x1234(:16|),r2l.b\\)" \
71 "neg.b @(0x1234:16,r2l.b)"
72 gdb_test "x" "neg.b\t@\\(0x1234(:16|),r2.w\\)" \
73 "neg.b @(0x1234:16,r2.w)"
74 gdb_test "x" "neg.b\t@\\(0x1234(:16|),er2.l\\)" \
75 "neg.b @(0x1234:16,er2.l)"
76 gdb_test "x" "neg.b\t@\\(0x12345678(:32|),r2l.b\\)" \
77 "neg.b @(0x12345678:32,r2l.b)"
78 gdb_test "x" "neg.b\t@\\(0x12345678(:32|),r2.w\\)" \
79 "neg.b @(0x12345678:32,r2.w)"
80 gdb_test "x" "neg.b\t@\\(0x12345678(:32|),er2.l\\)" \
81 "neg.b @(0x12345678:32,er2.l)"
82 gdb_test "x" "neg.b\t@0x12(:8|)" \
84 gdb_test "x" "neg.b\t@0x1234(:16|)" \
86 gdb_test "x" "neg.b\t@0x12345678(:32|)" \
87 "neg.b @0x12345678:32"
88 gdb_test "x" "neg.w\tr1" \
90 gdb_test "x" "neg.w\t@er1" \
92 gdb_test "x" "neg.w\t@\\(0x6(:2|),er1\\)" \
94 gdb_test "x" "neg.w\t@er1\\+" \
96 gdb_test "x" "neg.w\t@-er1" \
98 gdb_test "x" "neg.w\t@\\+er1" \
100 gdb_test "x" "neg.w\t@er1-" \
102 gdb_test "x" "neg.w\t@\\(0x1234(:16|),er1\\)" \
103 "neg.w @(0x1234:16,er1)"
104 gdb_test "x" "neg.w\t@\\(0x12345678(:32|),er1\\)" \
105 "neg.w @(0x12345678:32,er1)"
106 gdb_test "x" "neg.w\t@\\(0x1234(:16|),r2l.b\\)" \
107 "neg.w @(0x1234:16,r2l.b)"
108 gdb_test "x" "neg.w\t@\\(0x1234(:16|),r2.w\\)" \
109 "neg.w @(0x1234:16,r2.w)"
110 gdb_test "x" "neg.w\t@\\(0x1234(:16|),er2.l\\)" \
111 "neg.w @(0x1234:16,er2.l)"
112 gdb_test "x" "neg.w\t@\\(0x12345678(:32|),r2l.b\\)" \
113 "neg.w @(0x12345678:32,r2l.b)"
114 gdb_test "x" "neg.w\t@\\(0x12345678(:32|),r2.w\\)" \
115 "neg.w @(0x12345678:32,r2.w)"
116 gdb_test "x" "neg.w\t@\\(0x12345678(:32|),er2.l\\)" \
117 "neg.w @(0x12345678:32,er2.l)"
118 gdb_test "x" "neg.w\t@0x1234(:16|)" \
120 gdb_test "x" "neg.w\t@0x12345678(:32|)" \
121 "neg.w @0x12345678:32"
122 gdb_test "x" "neg.l\ter1" \
124 gdb_test "x" "neg.l\t@er1" \
126 gdb_test "x" "neg.l\t@\\(0xc(:2|),er1\\)" \
128 gdb_test "x" "neg.l\t@er1\\+" \
130 gdb_test "x" "neg.l\t@-er1" \
132 gdb_test "x" "neg.l\t@\\+er1" \
134 gdb_test "x" "neg.l\t@er1-" \
136 gdb_test "x" "neg.l\t@\\(0x1234(:16|),er1\\)" \
137 "neg.l @(0x1234:16,er1)"
138 gdb_test "x" "neg.l\t@\\(0x12345678(:32|),er1\\)" \
139 "neg.l @(0x12345678:32,er1)"
140 gdb_test "x" "neg.l\t@\\(0x1234(:16|),r2l.b\\)" \
141 "neg.l @(0x1234:16,r2l.b)"
142 gdb_test "x" "neg.l\t@\\(0x1234(:16|),r2.w\\)" \
143 "neg.l @(0x1234:16,r2.w)"
144 gdb_test "x" "neg.l\t@\\(0x1234(:16|),er2.l\\)" \
145 "neg.l @(0x1234:16,er2.l)"
146 gdb_test "x" "neg.l\t@\\(0x12345678(:32|),r2l.b\\)" \
147 "neg.l @(0x12345678:32,r2l.b)"
148 gdb_test "x" "neg.l\t@\\(0x12345678(:32|),r2.w\\)" \
149 "neg.l @(0x12345678:32,r2.w)"
150 gdb_test "x" "neg.l\t@\\(0x12345678(:32|),er2.l\\)" \
151 "neg.l @(0x12345678:32,er2.l)"
152 gdb_test "x" "neg.l\t@0x1234(:16|)" \
154 gdb_test "x" "neg.l\t@0x12345678(:32|)" \
155 "neg.l @0x12345678:32"
156 gdb_test "x" "tas\t@er1" \
158 gdb_test "x" "extu.w\tr1" \
160 gdb_test "x" "extu.w\t@er1" \
162 gdb_test "x" "extu.w\t@\\(0x6(:2|),er1\\)" \
163 "extu.w @(0x6:2,er1)"
164 gdb_test "x" "extu.w\t@er1\\+" \
166 gdb_test "x" "extu.w\t@-er1" \
168 gdb_test "x" "extu.w\t@\\+er1" \
170 gdb_test "x" "extu.w\t@er1-" \
172 gdb_test "x" "extu.w\t@\\(0x1234(:16|),er1\\)" \
173 "extu.w @(0x1234:16,er1)"
174 gdb_test "x" "extu.w\t@\\(0x12345678(:32|),er1\\)" \
175 "extu.w @(0x12345678:32,er1)"
176 gdb_test "x" "extu.w\t@\\(0x1234(:16|),r2l.b\\)" \
177 "extu.w @(0x1234:16,r2l.b)"
178 gdb_test "x" "extu.w\t@\\(0x1234(:16|),r2.w\\)" \
179 "extu.w @(0x1234:16,r2.w)"
180 gdb_test "x" "extu.w\t@\\(0x1234(:16|),er2.l\\)" \
181 "extu.w @(0x1234:16,er2.l)"
182 gdb_test "x" "extu.w\t@\\(0x12345678(:32|),r2l.b\\)" \
183 "extu.w @(0x12345678:32,r2l.b)"
184 gdb_test "x" "extu.w\t@\\(0x12345678(:32|),r2.w\\)" \
185 "extu.w @(0x12345678:32,r2.w)"
186 gdb_test "x" "extu.w\t@\\(0x12345678(:32|),er2.l\\)" \
187 "extu.w @(0x12345678:32,er2.l)"
188 gdb_test "x" "extu.w\t@0x1234(:16|)" \
190 gdb_test "x" "extu.w\t@0x12345678(:32|)" \
191 "extu.w @0x12345678:32"
192 gdb_test "x" "extu.l\ter1" \
194 gdb_test "x" "extu.l\t@er1" \
196 gdb_test "x" "extu.l\t@\\(0xc(:2|),er1\\)" \
197 "extu.l @(0xc:2,er1)"
198 gdb_test "x" "extu.l\t@er1\\+" \
200 gdb_test "x" "extu.l\t@-er1" \
202 gdb_test "x" "extu.l\t@\\+er1" \
204 gdb_test "x" "extu.l\t@er1-" \
206 gdb_test "x" "extu.l\t@\\(0x1234(:16|),er1\\)" \
207 "extu.l @(0x1234:16,er1)"
208 gdb_test "x" "extu.l\t@\\(0x12345678(:32|),er1\\)" \
209 "extu.l @(0x12345678:32,er1)"
210 gdb_test "x" "extu.l\t@\\(0x1234(:16|),r2l.b\\)" \
211 "extu.l @(0x1234:16,r2l.b)"
212 gdb_test "x" "extu.l\t@\\(0x1234(:16|),r2.w\\)" \
213 "extu.l @(0x1234:16,r2.w)"
214 gdb_test "x" "extu.l\t@\\(0x1234(:16|),er2.l\\)" \
215 "extu.l @(0x1234:16,er2.l)"
216 gdb_test "x" "extu.l\t@\\(0x12345678(:32|),r2l.b\\)" \
217 "extu.l @(0x12345678:32,r2l.b)"
218 gdb_test "x" "extu.l\t@\\(0x12345678(:32|),r2.w\\)" \
219 "extu.l @(0x12345678:32,r2.w)"
220 gdb_test "x" "extu.l\t@\\(0x12345678(:32|),er2.l\\)" \
221 "extu.l @(0x12345678:32,er2.l)"
222 gdb_test "x" "extu.l\t@0x1234(:16|)" \
224 gdb_test "x" "extu.l\t@0x12345678(:32|)" \
225 "extu.l @0x12345678:32"
226 gdb_test "x" "extu.l\t#2,er1" \
228 gdb_test "x" "extu.l\t#2,@er1" \
230 gdb_test "x" "extu.l\t#2,@\\(0xc(:2|),er1\\)" \
231 "extu.l #2,@(0xc:2,er1)"
232 gdb_test "x" "extu.l\t#2,@er1\\+" \
234 gdb_test "x" "extu.l\t#2,@-er1" \
236 gdb_test "x" "extu.l\t#2,@\\+er1" \
238 gdb_test "x" "extu.l\t#2,@er1-" \
240 gdb_test "x" "extu.l\t#2,@\\(0x1234(:16|),er1\\)" \
241 "extu.l #2,@(0x1234:16,er1)"
242 gdb_test "x" "extu.l\t#2,@\\(0x12345678(:32|),er1\\)" \
243 "extu.l #2,@(0x12345678:32,er1)"
244 gdb_test "x" "extu.l\t#2,@\\(0x1234(:16|),r2l.b\\)" \
245 "extu.l #2,@(0x1234:16,r2l.b)"
246 gdb_test "x" "extu.l\t#2,@\\(0x1234(:16|),r2.w\\)" \
247 "extu.l #2,@(0x1234:16,r2.w)"
248 gdb_test "x" "extu.l\t#2,@\\(0x1234(:16|),er2.l\\)" \
249 "extu.l #2,@(0x1234:16,er2.l)"
250 gdb_test "x" "extu.l\t#2,@\\(0x12345678(:32|),r2l.b\\)" \
251 "extu.l #2,@(0x12345678:32,r2l.b)"
252 gdb_test "x" "extu.l\t#2,@\\(0x12345678(:32|),r2.w\\)" \
253 "extu.l #2,@(0x12345678:32,r2.w)"
254 gdb_test "x" "extu.l\t#2,@\\(0x12345678(:32|),er2.l\\)" \
255 "extu.l #2,@(0x12345678:32,er2.l)"
256 gdb_test "x" "extu.l\t#2,@0x1234(:16|)" \
257 "extu.l #2,@0x1234:16"
258 gdb_test "x" "extu.l\t#2,@0x12345678(:32|)" \
259 "extu.l #2,@0x12345678:32"
260 gdb_test "x" "exts.w\tr1" \
262 gdb_test "x" "exts.w\t@er1" \
264 gdb_test "x" "exts.w\t@\\(0x6(:2|),er1\\)" \
265 "exts.w @(0x6:2,er1)"
266 gdb_test "x" "exts.w\t@er1\\+" \
268 gdb_test "x" "exts.w\t@-er1" \
270 gdb_test "x" "exts.w\t@\\+er1" \
272 gdb_test "x" "exts.w\t@er1-" \
274 gdb_test "x" "exts.w\t@\\(0x1234(:16|),er1\\)" \
275 "exts.w @(0x1234:16,er1)"
276 gdb_test "x" "exts.w\t@\\(0x12345678(:32|),er1\\)" \
277 "exts.w @(0x12345678:32,er1)"
278 gdb_test "x" "exts.w\t@\\(0x1234(:16|),r2l.b\\)" \
279 "exts.w @(0x1234:16,r2l.b)"
280 gdb_test "x" "exts.w\t@\\(0x1234(:16|),r2.w\\)" \
281 "exts.w @(0x1234:16,r2.w)"
282 gdb_test "x" "exts.w\t@\\(0x1234(:16|),er2.l\\)" \
283 "exts.w @(0x1234:16,er2.l)"
284 gdb_test "x" "exts.w\t@\\(0x12345678(:32|),r2l.b\\)" \
285 "exts.w @(0x12345678:32,r2l.b)"
286 gdb_test "x" "exts.w\t@\\(0x12345678(:32|),r2.w\\)" \
287 "exts.w @(0x12345678:32,r2.w)"
288 gdb_test "x" "exts.w\t@\\(0x12345678(:32|),er2.l\\)" \
289 "exts.w @(0x12345678:32,er2.l)"
290 gdb_test "x" "exts.w\t@0x1234(:16|)" \
292 gdb_test "x" "exts.w\t@0x12345678(:32|)" \
293 "exts.w @0x12345678:32"
294 gdb_test "x" "exts.l\ter1" \
296 gdb_test "x" "exts.l\t@er1" \
298 gdb_test "x" "exts.l\t@\\(0xc(:2|),er1\\)" \
299 "exts.l @(0xc:2,er1)"
300 gdb_test "x" "exts.l\t@er1\\+" \
302 gdb_test "x" "exts.l\t@-er1" \
304 gdb_test "x" "exts.l\t@\\+er1" \
306 gdb_test "x" "exts.l\t@er1-" \
308 gdb_test "x" "exts.l\t@\\(0x1234(:16|),er1\\)" \
309 "exts.l @(0x1234:16,er1)"
310 gdb_test "x" "exts.l\t@\\(0x12345678(:32|),er1\\)" \
311 "exts.l @(0x12345678:32,er1)"
312 gdb_test "x" "exts.l\t@\\(0x1234(:16|),r2l.b\\)" \
313 "exts.l @(0x1234:16,r2l.b)"
314 gdb_test "x" "exts.l\t@\\(0x1234(:16|),r2.w\\)" \
315 "exts.l @(0x1234:16,r2.w)"
316 gdb_test "x" "exts.l\t@\\(0x1234(:16|),er2.l\\)" \
317 "exts.l @(0x1234:16,er2.l)"
318 gdb_test "x" "exts.l\t@\\(0x12345678(:32|),r2l.b\\)" \
319 "exts.l @(0x12345678:32,r2l.b)"
320 gdb_test "x" "exts.l\t@\\(0x12345678(:32|),r2.w\\)" \
321 "exts.l @(0x12345678:32,r2.w)"
322 gdb_test "x" "exts.l\t@\\(0x12345678(:32|),er2.l\\)" \
323 "exts.l @(0x12345678:32,er2.l)"
324 gdb_test "x" "exts.l\t@0x1234(:16|)" \
326 gdb_test "x" "exts.l\t@0x12345678(:32|)" \
327 "exts.l @0x12345678:32"
328 gdb_test "x" "exts.l\t#2,er1" \
330 gdb_test "x" "exts.l\t#2,@er1" \
332 gdb_test "x" "exts.l\t#2,@\\(0xc(:2|),er1\\)" \
333 "exts.l #2,@(0xc:2,er1)"
334 gdb_test "x" "exts.l\t#2,@er1\\+" \
336 gdb_test "x" "exts.l\t#2,@-er1" \
338 gdb_test "x" "exts.l\t#2,@\\+er1" \
340 gdb_test "x" "exts.l\t#2,@er1-" \
342 gdb_test "x" "exts.l\t#2,@\\(0x1234(:16|),er1\\)" \
343 "exts.l #2,@(0x1234:16,er1)"
344 gdb_test "x" "exts.l\t#2,@\\(0x12345678(:32|),er1\\)" \
345 "exts.l #2,@(0x12345678:32,er1)"
346 gdb_test "x" "exts.l\t#2,@\\(0x1234(:16|),r2l.b\\)" \
347 "exts.l #2,@(0x1234:16,r2l.b)"
348 gdb_test "x" "exts.l\t#2,@\\(0x1234(:16|),r2.w\\)" \
349 "exts.l #2,@(0x1234:16,r2.w)"
350 gdb_test "x" "exts.l\t#2,@\\(0x1234(:16|),er2.l\\)" \
351 "exts.l #2,@(0x1234:16,er2.l)"
352 gdb_test "x" "exts.l\t#2,@\\(0x12345678(:32|),r2l.b\\)" \
353 "exts.l #2,@(0x12345678:32,r2l.b)"
354 gdb_test "x" "exts.l\t#2,@\\(0x12345678(:32|),r2.w\\)" \
355 "exts.l #2,@(0x12345678:32,r2.w)"
356 gdb_test "x" "exts.l\t#2,@\\(0x12345678(:32|),er2.l\\)" \
357 "exts.l #2,@(0x12345678:32,er2.l)"
358 gdb_test "x" "exts.l\t#2,@0x1234(:16|)" \
359 "exts.l #2,@0x1234:16"
360 gdb_test "x" "exts.l\t#2,@0x12345678(:32|)" \
361 "exts.l #2,@0x12345678:32"