gdb/testsuite/gdb.disasm/mn10200.exp

   1 # OBSOLETE
   2 # OBSOLETE # Copyright 1997 Free Software Foundation, Inc.
   3 # OBSOLETE
   4 # OBSOLETE # This program is free software; you can redistribute it and/or modify
   5 # OBSOLETE # it under the terms of the GNU General Public License as published by
   6 # OBSOLETE # the Free Software Foundation; either version 2 of the License, or
   7 # OBSOLETE # (at your option) any later version.
   8 # OBSOLETE #
   9 # OBSOLETE # This program is distributed in the hope that it will be useful,
  10 # OBSOLETE # but WITHOUT ANY WARRANTY; without even the implied warranty of
  11 # OBSOLETE # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
  12 # OBSOLETE # GNU General Public License for more details.
  13 # OBSOLETE #
  14 # OBSOLETE # You should have received a copy of the GNU General Public License
  15 # OBSOLETE # along with this program; if not, write to the Free Software
  16 # OBSOLETE # Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
  17 # OBSOLETE
  18 # OBSOLETE # Please email any bugs, comments, and/or additions to this file to:
  19 # OBSOLETE # bug-gdb@prep.ai.mit.edu
  20 # OBSOLETE
  21 # OBSOLETE # This file was written by Jeff Law. (law@cygnus.com)
  22 # OBSOLETE
  23 # OBSOLETE if $tracelevel then {
  24 # OBSOLETE      strace $tracelevel
  25 # OBSOLETE }
  26 # OBSOLETE
  27 # OBSOLETE if ![istarget "mn10200*-*-*"] {
  28 # OBSOLETE     verbose "Tests ignored for all but mn10200 based targets."
  29 # OBSOLETE     return
  30 # OBSOLETE }
  31 # OBSOLETE
  32 # OBSOLETE global exec_output
  33 # OBSOLETE set prms_id 0
  34 # OBSOLETE set bug_id 0
  35 # OBSOLETE
  36 # OBSOLETE set testfile "mn10200"
  37 # OBSOLETE set srcfile ${srcdir}/${subdir}/${testfile}.s
  38 # OBSOLETE set binfile ${objdir}/${subdir}/${testfile}
  39 # OBSOLETE if  { [gdb_compile "${srcfile}" "${binfile}" executable ""] != "" } {
  40 # OBSOLETE      gdb_suppress_entire_file "Testcase compile failed, so all tests in this file will automatically fail."
  41 # OBSOLETE }
  42 # OBSOLETE
  43 # OBSOLETE proc add_tests { } {
  44 # OBSOLETE     global gdb_prompt
  45 # OBSOLETE     global hex
  46 # OBSOLETE     global decimal
  47 # OBSOLETE
  48 # OBSOLETE     send_gdb "x/12i add_tests\n"
  49 # OBSOLETE     gdb_expect {
  50 # OBSOLETE      -re "
  51 # OBSOLETE .*add        d1,d2.*
  52 # OBSOLETE .*add        d2,a3.*
  53 # OBSOLETE .*add        a2,d1.*
  54 # OBSOLETE .*add        a3,a2.*
  55 # OBSOLETE .*add        16,d1.*
  56 # OBSOLETE .*add        256,d2.*
  57 # OBSOLETE .*add        131071,d3.*
  58 # OBSOLETE .*add        16,a1.*
  59 # OBSOLETE .*add        256,a2.*
  60 # OBSOLETE .*add        131071,a3.*
  61 # OBSOLETE .*addc       d1,d2.*
  62 # OBSOLETE .*addnf      16,a2.*
  63 # OBSOLETE .*$gdb_prompt $" { pass "add tests" }
  64 # OBSOLETE      -re "$gdb_prompt $" { fail "add tests" }
  65 # OBSOLETE      timeout { fail "(timeout) add tests" }
  66 # OBSOLETE     }
  67 # OBSOLETE }
  68 # OBSOLETE
  69 # OBSOLETE proc bcc_tests { } {
  70 # OBSOLETE     global gdb_prompt
  71 # OBSOLETE     global hex
  72 # OBSOLETE     global decimal
  73 # OBSOLETE
  74 # OBSOLETE     send_gdb "x/15i bCC_tests\n"
  75 # OBSOLETE     gdb_expect {
  76 # OBSOLETE      -re "
  77 # OBSOLETE .*beq        0x\[0-9a-f]+ <bCC_tests>.*
  78 # OBSOLETE .*bne        0x\[0-9a-f]+ <bCC_tests>.*
  79 # OBSOLETE .*bgt        0x\[0-9a-f]+ <bCC_tests>.*
  80 # OBSOLETE .*bge        0x\[0-9a-f]+ <bCC_tests>.*
  81 # OBSOLETE .*ble        0x\[0-9a-f]+ <bCC_tests>.*
  82 # OBSOLETE .*blt        0x\[0-9a-f]+ <bCC_tests>.*
  83 # OBSOLETE .*bhi        0x\[0-9a-f]+ <bCC_tests>.*
  84 # OBSOLETE .*bcc        0x\[0-9a-f]+ <bCC_tests>.*
  85 # OBSOLETE .*bls        0x\[0-9a-f]+ <bCC_tests>.*
  86 # OBSOLETE .*bcs        0x\[0-9a-f]+ <bCC_tests>.*
  87 # OBSOLETE .*bvc        0x\[0-9a-f]+ <bCC_tests>.*
  88 # OBSOLETE .*bvs        0x\[0-9a-f]+ <bCC_tests>.*
  89 # OBSOLETE .*bnc        0x\[0-9a-f]+ <bCC_tests>.*
  90 # OBSOLETE .*bns        0x\[0-9a-f]+ <bCC_tests>.*
  91 # OBSOLETE .*bra        0x\[0-9a-f]+ <bCC_tests>.*
  92 # OBSOLETE .*$gdb_prompt $" { pass "bCC tests" }
  93 # OBSOLETE      -re "$gdb_prompt $" { fail "bCC tests" }
  94 # OBSOLETE      timeout { fail "(timeout) bCC tests" }
  95 # OBSOLETE     }
  96 # OBSOLETE }
  97 # OBSOLETE
  98 # OBSOLETE proc bccx_tests { } {
  99 # OBSOLETE     global gdb_prompt
 100 # OBSOLETE     global hex
 101 # OBSOLETE     global decimal
 102 # OBSOLETE
 103 # OBSOLETE     send_gdb "x/14i bCCx_tests\n"
 104 # OBSOLETE     gdb_expect {
 105 # OBSOLETE      -re "
 106 # OBSOLETE .*beqx       0x\[0-9a-f]+ <bCCx_tests>.*
 107 # OBSOLETE .*bnex       0x\[0-9a-f]+ <bCCx_tests>.*
 108 # OBSOLETE .*bgtx       0x\[0-9a-f]+ <bCCx_tests>.*
 109 # OBSOLETE .*bgex       0x\[0-9a-f]+ <bCCx_tests>.*
 110 # OBSOLETE .*blex       0x\[0-9a-f]+ <bCCx_tests>.*
 111 # OBSOLETE .*bltx       0x\[0-9a-f]+ <bCCx_tests>.*
 112 # OBSOLETE .*bhix       0x\[0-9a-f]+ <bCCx_tests>.*
 113 # OBSOLETE .*bccx       0x\[0-9a-f]+ <bCCx_tests>.*
 114 # OBSOLETE .*blsx       0x\[0-9a-f]+ <bCCx_tests>.*
 115 # OBSOLETE .*bcsx       0x\[0-9a-f]+ <bCCx_tests>.*
 116 # OBSOLETE .*bvcx       0x\[0-9a-f]+ <bCCx_tests>.*
 117 # OBSOLETE .*bvsx       0x\[0-9a-f]+ <bCCx_tests>.*
 118 # OBSOLETE .*bncx       0x\[0-9a-f]+ <bCCx_tests>.*
 119 # OBSOLETE .*bnsx       0x\[0-9a-f]+ <bCCx_tests>.*
 120 # OBSOLETE .*$gdb_prompt $" { pass "bCCx tests" }
 121 # OBSOLETE      -re "$gdb_prompt $" { fail "bCCx tests" }
 122 # OBSOLETE      timeout { fail "(timeout) bCCx tests" }
 123 # OBSOLETE     }
 124 # OBSOLETE }
 125 # OBSOLETE
 126 # OBSOLETE proc bit_tests { } {
 127 # OBSOLETE     global gdb_prompt
 128 # OBSOLETE     global hex
 129 # OBSOLETE     global decimal
 130 # OBSOLETE
 131 # OBSOLETE     send_gdb "x/4 bit_tests\n"
 132 # OBSOLETE     gdb_expect {
 133 # OBSOLETE      -re "
 134 # OBSOLETE .*btst       64,d1.*
 135 # OBSOLETE .*btst       8192,d2.*
 136 # OBSOLETE .*bset       d1,\\(a2\\).*
 137 # OBSOLETE .*bclr       d1,\\(a2\\).*
 138 # OBSOLETE .*$gdb_prompt $" { pass "bit tests" }
 139 # OBSOLETE      -re "$gdb_prompt $" { fail "bit tests" }
 140 # OBSOLETE      timeout { fail "(timeout) bit tests" }
 141 # OBSOLETE     }
 142 # OBSOLETE }
 143 # OBSOLETE
 144 # OBSOLETE proc cmp_tests { } {
 145 # OBSOLETE     global gdb_prompt
 146 # OBSOLETE     global hex
 147 # OBSOLETE     global decimal
 148 # OBSOLETE
 149 # OBSOLETE     send_gdb "x/9i cmp_tests\n"
 150 # OBSOLETE     gdb_expect {
 151 # OBSOLETE      -re "
 152 # OBSOLETE .*cmp        d1,d2.*
 153 # OBSOLETE .*cmp        d2,a3.*
 154 # OBSOLETE .*cmp        a3,d3.*
 155 # OBSOLETE .*cmp        a3,a2.*
 156 # OBSOLETE .*cmp        16,d3.*
 157 # OBSOLETE .*cmp        256,d2.*
 158 # OBSOLETE .*cmp        131071,d1.*
 159 # OBSOLETE .*cmp        256,a2.*
 160 # OBSOLETE .*cmp        131071,a1.*
 161 # OBSOLETE .*$gdb_prompt $" { pass "cmp tests" }
 162 # OBSOLETE      -re "$gdb_prompt $" { fail "cmp tests" }
 163 # OBSOLETE      timeout { fail "(timeout) cmp tests" }
 164 # OBSOLETE     }
 165 # OBSOLETE }
 166 # OBSOLETE
 167 # OBSOLETE proc extend_tests { } {
 168 # OBSOLETE     global gdb_prompt
 169 # OBSOLETE     global hex
 170 # OBSOLETE     global decimal
 171 # OBSOLETE
 172 # OBSOLETE     send_gdb "x/5i extend_tests\n"
 173 # OBSOLETE     gdb_expect {
 174 # OBSOLETE      -re "
 175 # OBSOLETE .*ext        d1.*
 176 # OBSOLETE .*extx       d2.*
 177 # OBSOLETE .*extxu      d3.*
 178 # OBSOLETE .*extxb      d2.*
 179 # OBSOLETE .*extxbu     d1.*
 180 # OBSOLETE .*$gdb_prompt $" { pass "extend tests" }
 181 # OBSOLETE      -re "$gdb_prompt $" { fail "extend tests" }
 182 # OBSOLETE      timeout { fail "(timeout) extend tests" }
 183 # OBSOLETE     }
 184 # OBSOLETE }
 185 # OBSOLETE
 186 # OBSOLETE proc logical_tests { } {
 187 # OBSOLETE     global gdb_prompt
 188 # OBSOLETE     global hex
 189 # OBSOLETE     global decimal
 190 # OBSOLETE
 191 # OBSOLETE     send_gdb "x/11i logical_tests\n"
 192 # OBSOLETE     gdb_expect {
 193 # OBSOLETE      -re "
 194 # OBSOLETE .*and        d1,d2.*
 195 # OBSOLETE .*and        127,d2.*
 196 # OBSOLETE .*and        32767,d3.*
 197 # OBSOLETE .*and        32767,psw.*
 198 # OBSOLETE .*or d1,d2.*
 199 # OBSOLETE .*or 127,d2.*
 200 # OBSOLETE .*or 32767,d3.*
 201 # OBSOLETE .*or 32767,psw.*
 202 # OBSOLETE .*xor        d1,d2.*
 203 # OBSOLETE .*xor        32767,d3.*
 204 # OBSOLETE .*not        d3.*
 205 # OBSOLETE .*$gdb_prompt $" { pass "logical tests" }
 206 # OBSOLETE      -re "$gdb_prompt $" { fail "logical tests" }
 207 # OBSOLETE      timeout { fail "(timeout) logical tests" }
 208 # OBSOLETE     }
 209 # OBSOLETE }
 210 # OBSOLETE
 211 # OBSOLETE proc mov_tests_1 { } {
 212 # OBSOLETE     global gdb_prompt
 213 # OBSOLETE     global hex
 214 # OBSOLETE     global decimal
 215 # OBSOLETE
 216 # OBSOLETE     send_gdb "x/12i mov_tests_1\n"
 217 # OBSOLETE     gdb_expect {
 218 # OBSOLETE      -re "
 219 # OBSOLETE .*mov        d1,a2.*
 220 # OBSOLETE .*mov        a2,d1.*
 221 # OBSOLETE .*mov        d1,d2.*
 222 # OBSOLETE .*mov        a2,a1.*
 223 # OBSOLETE .*mov        psw,d3.*
 224 # OBSOLETE .*mov        d2,psw.*
 225 # OBSOLETE .*mov        mdr,d1.*
 226 # OBSOLETE .*mov        d2,mdr.*
 227 # OBSOLETE .*mov        \\(a2\\),d1.*
 228 # OBSOLETE .*mov        \\(8,a2\\),d1.*
 229 # OBSOLETE .*mov        \\(256,a2\\),d1.*
 230 # OBSOLETE .*mov        \\(131071,a2\\),d1.*
 231 # OBSOLETE .*$gdb_prompt $" { pass "mov1 tests" }
 232 # OBSOLETE      -re "$gdb_prompt $" { fail "mov1 tests" }
 233 # OBSOLETE      timeout { fail "(timeout) mov1 tests" }
 234 # OBSOLETE     }
 235 # OBSOLETE }
 236 # OBSOLETE
 237 # OBSOLETE proc mov_tests_2 { } {
 238 # OBSOLETE     global gdb_prompt
 239 # OBSOLETE     global hex
 240 # OBSOLETE     global decimal
 241 # OBSOLETE
 242 # OBSOLETE     send_gdb "x/9 mov_tests_2\n"
 243 # OBSOLETE     gdb_expect {
 244 # OBSOLETE      -re "
 245 # OBSOLETE .*mov        \\(d1,a1\\),d2.*
 246 # OBSOLETE .*mov        \\(0x8000.*\\),d1.*
 247 # OBSOLETE .*mov        \\(0x1ffff.*\\),d1.*
 248 # OBSOLETE .*mov        \\(8,a2\\),a1.*
 249 # OBSOLETE .*mov        \\(256,a2\\),a1.*
 250 # OBSOLETE .*mov        \\(131071,a2\\),a1.*
 251 # OBSOLETE .*mov        \\(d1,a1\\),a2.*
 252 # OBSOLETE .*mov        \\(0x8000.*\\),a1.*
 253 # OBSOLETE .*mov        \\(0x1ffff.*\\),a1.*
 254 # OBSOLETE .*$gdb_prompt $" { pass "mov2 tests" }
 255 # OBSOLETE      -re "$gdb_prompt $" { fail "mov2 tests" }
 256 # OBSOLETE      timeout { fail "(timeout) mov2 tests" }
 257 # OBSOLETE     }
 258 # OBSOLETE }
 259 # OBSOLETE
 260 # OBSOLETE proc mov_tests_3 { } {
 261 # OBSOLETE     global gdb_prompt
 262 # OBSOLETE     global hex
 263 # OBSOLETE     global decimal
 264 # OBSOLETE
 265 # OBSOLETE     send_gdb "x/10 mov_tests_3\n"
 266 # OBSOLETE     gdb_expect {
 267 # OBSOLETE      -re "
 268 # OBSOLETE .*mov        d1,\\(a2\\).*
 269 # OBSOLETE .*mov        d1,\\(32,a2\\).*
 270 # OBSOLETE .*mov        d1,\\(256,a2\\).*
 271 # OBSOLETE .*mov        d1,\\(131071,a2\\).*
 272 # OBSOLETE .*mov        d1,\\(d2,a2\\).*
 273 # OBSOLETE .*mov        d1,\\(0x80.*\\).*
 274 # OBSOLETE .*mov        d1,\\(0x1ffff.*\\).*
 275 # OBSOLETE .*mov        a1,\\(32,a2\\).*
 276 # OBSOLETE .*mov        a1,\\(256,a2\\).*
 277 # OBSOLETE .*mov        a1,\\(131071,a2\\).*
 278 # OBSOLETE .*$gdb_prompt $" { pass "mov3 tests" }
 279 # OBSOLETE      -re "$gdb_prompt $" { fail "mov3 tests" }
 280 # OBSOLETE      timeout { fail "(timeout) mov3 tests" }
 281 # OBSOLETE     }
 282 # OBSOLETE }
 283 # OBSOLETE
 284 # OBSOLETE proc mov_tests_4 { } {
 285 # OBSOLETE     global gdb_prompt
 286 # OBSOLETE     global hex
 287 # OBSOLETE     global decimal
 288 # OBSOLETE
 289 # OBSOLETE     send_gdb "x/8 mov_tests_4\n"
 290 # OBSOLETE     gdb_expect {
 291 # OBSOLETE      -re "
 292 # OBSOLETE .*mov        a1,\\(d2,a2\\).*
 293 # OBSOLETE .*mov        a1,\\(0x80.*\\).*
 294 # OBSOLETE .*mov        a1,\\(0x1ffff.*\\).*
 295 # OBSOLETE .*mov        8,d1.*
 296 # OBSOLETE .*mov        256,d1.*
 297 # OBSOLETE .*mov        131071,d1.*
 298 # OBSOLETE .*mov        256,a1.*
 299 # OBSOLETE .*mov        131071,a1.*
 300 # OBSOLETE .*$gdb_prompt $" { pass "mov4 tests" }
 301 # OBSOLETE      -re "$gdb_prompt $" { fail "mov4 tests" }
 302 # OBSOLETE      timeout { fail "(timeout) mov4 tests" }
 303 # OBSOLETE     }
 304 # OBSOLETE }
 305 # OBSOLETE
 306 # OBSOLETE proc movb_tests { } {
 307 # OBSOLETE     global gdb_prompt
 308 # OBSOLETE     global hex
 309 # OBSOLETE     global decimal
 310 # OBSOLETE
 311 # OBSOLETE     send_gdb "x/12 movb_tests\n"
 312 # OBSOLETE     gdb_expect {
 313 # OBSOLETE      -re "
 314 # OBSOLETE .*movb       \\(8,a2\\),d1.*
 315 # OBSOLETE .*movb       \\(256,a2\\),d1.*
 316 # OBSOLETE .*movb       \\(131071,a2\\),d1.*
 317 # OBSOLETE .*movb       \\(d2,a2\\),d3.*
 318 # OBSOLETE .*movb       \\(0x1ffff.*\\),d2.*
 319 # OBSOLETE .*movb       d1,\\(a2\\).*
 320 # OBSOLETE .*movb       d1,\\(8,a2\\).*
 321 # OBSOLETE .*movb       d1,\\(256,a2\\).*
 322 # OBSOLETE .*movb       d1,\\(131071,a2\\).*
 323 # OBSOLETE .*movb       d1,\\(d2,a2\\).*
 324 # OBSOLETE .*movb       d1,\\(0x100.*\\).*
 325 # OBSOLETE .*movb       d1,\\(0x1ffff.*\\).*
 326 # OBSOLETE .*$gdb_prompt $" { pass "movb tests" }
 327 # OBSOLETE      -re "$gdb_prompt $" { fail "movb tests" }
 328 # OBSOLETE      timeout { fail "(timeout) movb tests" }
 329 # OBSOLETE     }
 330 # OBSOLETE }
 331 # OBSOLETE
 332 # OBSOLETE proc movbu_tests { } {
 333 # OBSOLETE     global gdb_prompt
 334 # OBSOLETE     global hex
 335 # OBSOLETE     global decimal
 336 # OBSOLETE
 337 # OBSOLETE     send_gdb "x/7 movbu_tests\n"
 338 # OBSOLETE     gdb_expect {
 339 # OBSOLETE      -re "
 340 # OBSOLETE .*movbu      \\(a2\\),d1.*
 341 # OBSOLETE .*movbu      \\(8,a2\\),d1.*
 342 # OBSOLETE .*movbu      \\(256,a2\\),d1.*
 343 # OBSOLETE .*movbu      \\(131071,a2\\),d1.*
 344 # OBSOLETE .*movbu      \\(d1,a1\\),d2.*
 345 # OBSOLETE .*movbu      \\(0x8000.*\\),d1.*
 346 # OBSOLETE .*movbu      \\(0x1ffff.*\\),d1.*
 347 # OBSOLETE .*$gdb_prompt $" { pass "movbu tests" }
 348 # OBSOLETE      -re "$gdb_prompt $" { fail "movbu tests" }
 349 # OBSOLETE      timeout { fail "(timeout) movbu tests" }
 350 # OBSOLETE     }
 351 # OBSOLETE }
 352 # OBSOLETE
 353 # OBSOLETE proc movx_tests { } {
 354 # OBSOLETE     global gdb_prompt
 355 # OBSOLETE     global hex
 356 # OBSOLETE     global decimal
 357 # OBSOLETE
 358 # OBSOLETE     send_gdb "x/6 movx_tests\n"
 359 # OBSOLETE     gdb_expect {
 360 # OBSOLETE      -re "
 361 # OBSOLETE .*movx       \\(8,a2\\),d1.*
 362 # OBSOLETE .*movx       \\(256,a2\\),d1.*
 363 # OBSOLETE .*movx       \\(131071,a2\\),d1.*
 364 # OBSOLETE .*movx       d1,\\(8,a2\\).*
 365 # OBSOLETE .*movx       d1,\\(256,a2\\).*
 366 # OBSOLETE .*movx       d1,\\(131071,a2\\).*
 367 # OBSOLETE .*$gdb_prompt $" { pass "movx tests" }
 368 # OBSOLETE      -re "$gdb_prompt $" { fail "movx tests" }
 369 # OBSOLETE      timeout { fail "(timeout) movx tests" }
 370 # OBSOLETE     }
 371 # OBSOLETE }
 372 # OBSOLETE
 373 # OBSOLETE proc muldiv_tests { } {
 374 # OBSOLETE     global gdb_prompt
 375 # OBSOLETE     global hex
 376 # OBSOLETE     global decimal
 377 # OBSOLETE
 378 # OBSOLETE     send_gdb "x/3 muldiv_tests\n"
 379 # OBSOLETE     gdb_expect {
 380 # OBSOLETE      -re "
 381 # OBSOLETE .*mul        d1,d2.*
 382 # OBSOLETE .*mulu       d2,d3.*
 383 # OBSOLETE .*divu       d3,d2.*
 384 # OBSOLETE .*$gdb_prompt $" { pass "muldiv tests" }
 385 # OBSOLETE      -re "$gdb_prompt $" { fail "muldiv tests" }
 386 # OBSOLETE      timeout { fail "(timeout) muldiv tests" }
 387 # OBSOLETE     }
 388 # OBSOLETE }
 389 # OBSOLETE
 390 # OBSOLETE proc misc_tests { } {
 391 # OBSOLETE     global gdb_prompt
 392 # OBSOLETE     global hex
 393 # OBSOLETE     global decimal
 394 # OBSOLETE
 395 # OBSOLETE     send_gdb "x/9 misc_tests\n"
 396 # OBSOLETE     gdb_expect {
 397 # OBSOLETE      -re "
 398 # OBSOLETE .*jmp        0x\[0-9a-f]+ <main>.*
 399 # OBSOLETE .*jmp        0x\[0-9a-f]+ <start>.*
 400 # OBSOLETE .*jmp        \\(a2\\).*
 401 # OBSOLETE .*jsr        0x\[0-9a-f]+ <main>.*
 402 # OBSOLETE .*jsr        0x\[0-9a-f]+ <start>.*
 403 # OBSOLETE .*jsr        \\(a2\\).*
 404 # OBSOLETE .*rts.*
 405 # OBSOLETE .*rti.*
 406 # OBSOLETE .*nop.*
 407 # OBSOLETE .*$gdb_prompt $" { pass "misc tests" }
 408 # OBSOLETE      -re "$gdb_prompt $" { fail "misc tests" }
 409 # OBSOLETE      timeout { fail "(timeout) misc tests" }
 410 # OBSOLETE     }
 411 # OBSOLETE }
 412 # OBSOLETE
 413 # OBSOLETE proc shift_tests { } {
 414 # OBSOLETE     global gdb_prompt
 415 # OBSOLETE     global hex
 416 # OBSOLETE     global decimal
 417 # OBSOLETE
 418 # OBSOLETE     send_gdb "x/4i shift_tests\n"
 419 # OBSOLETE     gdb_expect {
 420 # OBSOLETE      -re "
 421 # OBSOLETE .*asr        d2.*
 422 # OBSOLETE .*lsr        d3.*
 423 # OBSOLETE .*ror        d1.*
 424 # OBSOLETE .*rol        d2.*
 425 # OBSOLETE .*$gdb_prompt $" { pass "shift tests" }
 426 # OBSOLETE      -re "$gdb_prompt $" { fail "shift tests" }
 427 # OBSOLETE      timeout { fail "(timeout) shift tests" }
 428 # OBSOLETE     }
 429 # OBSOLETE }
 430 # OBSOLETE
 431 # OBSOLETE proc sub_tests { } {
 432 # OBSOLETE     global gdb_prompt
 433 # OBSOLETE     global hex
 434 # OBSOLETE     global decimal
 435 # OBSOLETE
 436 # OBSOLETE     send_gdb "x/9i sub_tests\n"
 437 # OBSOLETE     gdb_expect {
 438 # OBSOLETE      -re "
 439 # OBSOLETE .*sub        d1,d2.*
 440 # OBSOLETE .*sub        d2,a3.*
 441 # OBSOLETE .*sub        a3,d3.*
 442 # OBSOLETE .*sub        a3,a2.*
 443 # OBSOLETE .*sub        32767,d2.*
 444 # OBSOLETE .*sub        131071,d2.*
 445 # OBSOLETE .*sub        32767,a2.*
 446 # OBSOLETE .*sub        131071,a2.*
 447 # OBSOLETE .*subc       d1,d2.*
 448 # OBSOLETE .*$gdb_prompt $" { pass "sub tests" }
 449 # OBSOLETE      -re "$gdb_prompt $" { fail "sub tests" }
 450 # OBSOLETE      timeout { fail "(timeout) sub tests" }
 451 # OBSOLETE     }
 452 # OBSOLETE }
 453 # OBSOLETE
 454 # OBSOLETE # Start with a fresh gdb.
 455 # OBSOLETE
 456 # OBSOLETE gdb_exit
 457 # OBSOLETE gdb_start
 458 # OBSOLETE gdb_reinitialize_dir $srcdir/$subdir
 459 # OBSOLETE gdb_load $binfile
 460 # OBSOLETE
 461 # OBSOLETE add_tests
 462 # OBSOLETE bcc_tests
 463 # OBSOLETE bccx_tests
 464 # OBSOLETE bit_tests
 465 # OBSOLETE cmp_tests
 466 # OBSOLETE extend_tests
 467 # OBSOLETE logical_tests
 468 # OBSOLETE mov_tests_1
 469 # OBSOLETE mov_tests_2
 470 # OBSOLETE mov_tests_3
 471 # OBSOLETE mov_tests_4
 472 # OBSOLETE movb_tests
 473 # OBSOLETE movbu_tests
 474 # OBSOLETE movx_tests
 475 # OBSOLETE muldiv_tests
 476 # OBSOLETE misc_tests
 477 # OBSOLETE shift_tests
 478 # OBSOLETE sub_tests