* config/udi.exp,unix.exp: Transform tool name.
authorRob Savoye <rob@cygnus>
Wed, 3 Nov 1993 18:15:18 +0000 (18:15 +0000)
committerRob Savoye <rob@cygnus>
Wed, 3 Nov 1993 18:15:18 +0000 (18:15 +0000)
* binutils.all/*.exp: Clear errorInfo after exec.

binutils/testsuite/config/udi.exp
binutils/testsuite/config/unix.exp

index d71e3e9c283d9efb50a7fb1251fe1db53a0c57f4..29ea0d861b226ab6bfa7034a558bf06cd48b4eaf 100644 (file)
 
 load_lib util-defs.exp
 
-#
-# nm_version -- extract and print the version number of nm
-#
-proc nm_version { } {
-    set tmp [exec $NM +version]
-    regexp " \[0-9\.\]+" $tmp version
-    clone_output "[which $NM] version $version\n"
-    unset tmp
-    unset version
+if ![info exists NM] then {
+    set NM [transform nm]
+}
+if ![info exists NMFLAGS] then {
+    set NMFLAGS ""
+}
+if ![info exists SIZE] then {
+    set SIZE [transform size]
+}
+if ![info exists SIZEFLAGS] then {
+    set SIZEFLAGS ""
+}
+if ![info exists OBJDUMP] then {
+    set OBJDUMP [transform objdump]
+}
+if ![info exists OBJDUMPFLAGS] then {
+    set OBJDUMPFLAGS ""
 }
 
 #
index d71e3e9c283d9efb50a7fb1251fe1db53a0c57f4..29ea0d861b226ab6bfa7034a558bf06cd48b4eaf 100644 (file)
 
 load_lib util-defs.exp
 
-#
-# nm_version -- extract and print the version number of nm
-#
-proc nm_version { } {
-    set tmp [exec $NM +version]
-    regexp " \[0-9\.\]+" $tmp version
-    clone_output "[which $NM] version $version\n"
-    unset tmp
-    unset version
+if ![info exists NM] then {
+    set NM [transform nm]
+}
+if ![info exists NMFLAGS] then {
+    set NMFLAGS ""
+}
+if ![info exists SIZE] then {
+    set SIZE [transform size]
+}
+if ![info exists SIZEFLAGS] then {
+    set SIZEFLAGS ""
+}
+if ![info exists OBJDUMP] then {
+    set OBJDUMP [transform objdump]
+}
+if ![info exists OBJDUMPFLAGS] then {
+    set OBJDUMPFLAGS ""
 }
 
 #