From 4d808b086d79b364f2167dd041dc65146eeaac5a Mon Sep 17 00:00:00 2001 From: Kazu Hirata Date: Fri, 8 Sep 2006 17:24:01 +0000 Subject: [PATCH] gas/testsuite/ Backport 2006-09-08 Kazu Hirata * lib/gas-dg.exp (gas-dg-test): Treat $dir as a literal. --- ChangeLog.csl | 8 ++++++++ gas/testsuite/lib/gas-dg.exp | 3 ++- 2 files changed, 10 insertions(+), 1 deletion(-) diff --git a/ChangeLog.csl b/ChangeLog.csl index 6cfb514..6d4c3ce 100644 --- a/ChangeLog.csl +++ b/ChangeLog.csl @@ -1,3 +1,11 @@ +2006-09-08 Kazu Hirata + + gas/testsuite/ + Backport + 2006-09-08 Kazu Hirata + + * lib/gas-dg.exp (gas-dg-test): Treat $dir as a literal. + 2006-09-07 Paul Brook gas/ diff --git a/gas/testsuite/lib/gas-dg.exp b/gas/testsuite/lib/gas-dg.exp index 92f7f31..801b9b4 100644 --- a/gas/testsuite/lib/gas-dg.exp +++ b/gas/testsuite/lib/gas-dg.exp @@ -36,7 +36,8 @@ proc gas-dg-test { prog do_what tool_flags } { regsub -all "//" $dir "/" dir regsub -all "//" $prog "/" prog if [string match "$dir/*" $prog] { - regsub "$dir" $prog "" prog + # We use (?q) to treat $dir as a literal. + regsub "(?q)$dir" $prog "" prog } # FIXME: This should be gas_start but it doesn't set comp_output. -- 2.7.4