1 # Copyright (C) 2009-2016 Free Software Foundation, Inc. 2 3 # This program is free software; you can redistribute it and/or modify 4 # it under the terms of the GNU General Public License as published by 5 # the Free Software Foundation; either version 3 of the License, or 6 # (at your option) any later version. 7 # 8 # This program is distributed in the hope that it will be useful, 9 # but WITHOUT ANY WARRANTY; without even the implied warranty of 10 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the 11 # GNU General Public License for more details. 12 # 13 # You should have received a copy of the GNU General Public License 14 # along with this program; if not, write to the Free Software 15 # Foundation, Inc., 51 Franklin Street - Fifth Floor, Boston, MA 02110-1301, USA. 16 17 if {![istarget "bfin-*-*"]} then { 18 return 19 } 20 21 if {[which $OBJDUMP] == 0} then { 22 perror "$OBJDUMP does not exist" 23 return 24 } 25 26 send_user "Version [binutil_version $OBJDUMP]" 27 28 ################################### 29 # Set up the test of unknown-mode.s 30 ################################### 31 32 if {![binutils_assemble $srcdir/$subdir/unknown-mode.s tmpdir/unknown-mode.o]} then { 33 return 34 } 35 36 if [is_remote host] { 37 set objfile [remote_download host tmpdir/unknown-mode.o] 38 } else { 39 set objfile tmpdir/unknown-mode.o 40 } 41 42 # Make sure that the unknown mode does not cause abort. 43 44 set got [binutils_run $OBJDUMP "$OBJDUMPFLAGS -D $objfile"] 45 46 set want "e1 c1\[ \t\]*ILLEGAL.*34 98 .*\[\r\n\]" 47 48 if [regexp $want $got] then { 49 pass "unknown mode test" 50 } else { 51 fail "unknown mode test" 52 } 53
