This is the mail archive of the binutils@sources.redhat.com mailing list for the binutils project.


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]
Other format: [Raw text]

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
 	}
     }


Index Nav: [Date Index] [Subject Index] [Author Index] [Thread Index]
Message Nav: [Date Prev] [Date Next] [Thread Prev] [Thread Next]