Copyright update for binutils
[binutils-gdb.git] / binutils / testsuite / lib / binutils-common.exp
index 424ca3d7cd8c747f6b3f2a28b3720f4e6abb37bb..64b66a478b2af051c020088c53cc8c797c8ccf19 100644 (file)
@@ -1,5 +1,4 @@
-# Copyright 1993, 1994, 1995, 1996, 1997, 2000, 2001, 2003, 2004, 2006, 2007,
-# 2009, 2010 Free Software Foundation, Inc.
+# Copyright (C) 1993-2016 Free Software Foundation, Inc.
 #
 # This file is part of the GNU Binutils.
 #
@@ -30,18 +29,26 @@ proc is_elf_format {} {
         && ![istarget ia64-*-hpux*]
         && ![istarget *-*-linux*]
         && ![istarget *-*-gnu*]
+        && ![istarget *-*-nacl*]
         && ![istarget frv-*-uclinux*]
         && ![istarget bfin-*-uclinux]
         && ![istarget sh*-*-uclinux*]
+        && ![istarget tic6x*-*-uclinux*]
         && ![istarget *-*-irix5*]
         && ![istarget *-*-irix6*]
+        && ![istarget *-*-freebsd*]
         && ![istarget *-*-netbsd*]
         && ![istarget *-*-openbsd*]
         && ![istarget *-*-solaris2*] } {
        return 0
     }
 
+    if { [istarget i?86-*-freebsd\[12\].*] } {
+        return 0
+    }
+
     if { [istarget *-*-linux*aout*]
+        || [istarget *-*-linux*ecoff*]
         || [istarget *-*-linux*oldld*]
         || [istarget h8500-*-rtems*]
         || [istarget i960-*-rtems*]
@@ -90,7 +97,7 @@ proc is_aout_format {} {
         || [istarget arm-*-netbsd*]
         || [istarget arm-*-openbsd*]
         || [istarget arm-*-riscix*]
-        || [istarget i?86-*-freebsd\[12\]*]
+        || [istarget i?86-*-freebsd\[12\].*]
         || [istarget i?86-*-netbsd*]
         || [istarget i?86-*-openbsd\[0-2\]*]
         || [istarget i?86-*-openbsd3.\[0-2\]*]
@@ -237,7 +244,7 @@ proc regexp_diff { file_1 file_2 args } {
                    set diff_pass 1
                    break
                }
-               set negated [expr { [string index $line_b 0] eq "!" }]
+               set negated [expr { [string index $line_b 0] == "!" }]
                set line_bx [string range $line_b $negated end]
                set n [expr { $negated ? "! " : "" }]
                # Substitute on the reference.
@@ -275,7 +282,7 @@ proc regexp_diff { file_1 file_2 args } {
            set differences 1
            break
        } else {
-           set negated [expr { [string index $line_b 0] eq "!" }]
+           set negated [expr { [string index $line_b 0] == "!" }]
            set line_bx [string range $line_b $negated end]
            set n [expr { $negated ? "! " : "" }]
            set s [expr { $negated ? "  " : "" }]