This is the mail archive of the
binutils@sources.redhat.com
mailing list for the binutils project.
PATCH: Support tcl 8.3.5 in gas/all/gas.exp
- From: "H. J. Lu" <hjl at lucon dot org>
- To: jbeulich at novell dot com
- Cc: binutils at sources dot redhat dot com
- Date: Wed, 25 Aug 2004 09:53:19 -0700
- Subject: PATCH: Support tcl 8.3.5 in gas/all/gas.exp
tcl 8.3.5 doesn't have `eq ""'. We should use `string match ""'.
H.J.
---
2004-08-25 H.J. Lu <hongjiu.lu@intel.com>
* gas/all/gas.exp: Use `string match ""' instead of `eq ""'.
--- gas/all/gas.exp.tcl 2004-08-24 09:39:53.000000000 -0700
+++ gas/all/gas.exp 2004-08-25 09:44:53.336558389 -0700
@@ -127,7 +127,7 @@ case $target_triplet in {
run_dump_test altmacro
# The second test is valid only when '!' is not a comment
# character (it is allowed to be a line comment character).
- if { [lindex [gas_run excl.s "-o /dev/null" ""] 0] eq "" } {
+ if [string match "" [lindex [gas_run excl.s "-o /dev/null" ""] 0]] {
run_dump_test altmac2
}
}