gas/testsuite/gas/sparc/mismatch.exp

   1 # Copyright 2012
   2 # Free Software Foundation, Inc.
   3
   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.
   8 #
   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.
  13 #
  14 # You should have received a copy of the GNU General Public License
  15 # along with this program; if not, write to the Free Software
  16 # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA.
  17
  18 # Test architecture mismatch errors.
  19 #
  20 # GAS issues two lines of error text for each mismatch:
  21 #
  22 # mm-lite.s:7: Error: Architecture mismatch on "divscc".
  23 # mm-lite.s:7:  (Requires sparclite; requested architecture is v8.)
  24 #
  25 # The suggested regexp argument to dg-error is "mismatch|<arch>".
  26
  27 if [istarget sparc*-*-*] {
  28
  29     load_lib gas-dg.exp
  30
  31     dg-init
  32
  33     dg-runtest [lsort [glob -nocomplain $srcdir/$subdir/mism-*.s]] "" ""
  34
  35     dg-finish
  36
  37 }