PATCH: Support tcl 8.3.5 in gas/all/gas.exp
H. J. Lu
hjl@lucon.org
Wed Aug 25 16:53:00 GMT 2004
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
}
}
More information about the Binutils
mailing list