From: Richard Sandiford <richard@codesourcery.com>
Date: Tue, 12 Dec 2006 20:12:28 +0000 (+0000)
Subject: gcc-dg.exp (${tool}_load): Fix invocation of saved_${tool}_load.
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=fb027ec88c8fdbcabb201e667f8442dc54a949fd;p=gcc.git

gcc-dg.exp (${tool}_load): Fix invocation of saved_${tool}_load.

gcc/testsuite/
	* lib/gcc-dg.exp (${tool}_load): Fix invocation of
	saved_${tool}_load.

From-SVN: r119795
---

diff --git a/gcc/testsuite/ChangeLog b/gcc/testsuite/ChangeLog
index 724bd05c827..6f84fa55188 100644
--- a/gcc/testsuite/ChangeLog
+++ b/gcc/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2006-12-12  Richard Sandiford  <richard@codesourcery.com>
+
+	* lib/gcc-dg.exp (${tool}_load): Fix invocation of
+	saved_${tool}_load.
+
 2006-12-12  Ira Rosen  <irar@il.ibm.com>
 
 	* gcc.dg/vect/vect-strided-store-u32-i2.c: New test.
diff --git a/gcc/testsuite/lib/gcc-dg.exp b/gcc/testsuite/lib/gcc-dg.exp
index 2dedf3b512a..5764c0fed37 100644
--- a/gcc/testsuite/lib/gcc-dg.exp
+++ b/gcc/testsuite/lib/gcc-dg.exp
@@ -196,7 +196,7 @@ if { [info procs ${tool}_load] != [list] \
     proc ${tool}_load { program args } {
 	global tool
 	global shouldfail
-	set result [saved_${tool}_load $program $args]
+	set result [eval [list saved_${tool}_load $program] $args]
 	if { $shouldfail != 0 } {
 	    switch [lindex $result 0] {
 		"pass" { set status "fail" }