c-torture.exp (c-torture-compile, [...]): Treat $srcdir as a literal.

* lib/c-torture.exp (c-torture-compile, c-torture-execute):
	Treat $srcdir as a literal.
	* lib/fortran-torture.exp (fortran-torture-compile,
	fortran-torture-execute): Likewise.
	* lib/objc-torture.exp (objc-torture-compile,
	objc-torture-execute): Likewise.
	* lib/profopt.exp (profopt-execute): Likewise.

From-SVN: r116894
This commit is contained in:
Kazu Hirata 2006-09-12 17:12:49 +00:00 committed by Kazu Hirata
parent b095810f1b
commit f63fc0d933
5 changed files with 17 additions and 7 deletions

View File

@ -1,3 +1,13 @@
2006-09-12 Kazu Hirata <kazu@codesourcery.com>
* lib/c-torture.exp (c-torture-compile, c-torture-execute):
Treat $srcdir as a literal.
* lib/fortran-torture.exp (fortran-torture-compile,
fortran-torture-execute): Likewise.
* lib/objc-torture.exp (objc-torture-compile,
objc-torture-execute): Likewise.
* lib/profopt.exp (profopt-execute): Likewise.
2006-09-11 Geoffrey Keating <geoffk@apple.com>
* gcc.dg/debug/dwarf2/dwarf-file1.c: New.

View File

@ -65,7 +65,7 @@ proc c-torture-compile { src option } {
set output "$tmpdir/[file tail [file rootname $src]].o"
regsub "^$srcdir/?" $src "" testcase
regsub "(?q)$srcdir/" $src "" testcase
# If we couldn't rip $srcdir out of `src' then just do the best we can.
# The point is to reduce the unnecessary noise in the logs. Don't strip
# out too much because different testcases with the same name can confuse
@ -127,7 +127,7 @@ proc c-torture-execute { sources args } {
set executable $tmpdir/[file tail [file rootname $src].x]
regsub "^$srcdir/?" $src "" testcase
regsub "(?q)$srcdir/" $src "" testcase
# If we couldn't rip $srcdir out of `src' then just do the best we can.
# The point is to reduce the unnecessary noise in the logs. Don't strip
# out too much because different testcases with the same name can confuse

View File

@ -54,7 +54,7 @@ proc fortran-torture-compile { src option } {
set output "$tmpdir/[file tail [file rootname $src]].o"
regsub "^$srcdir/?" $src "" testcase
regsub "(?q)$srcdir/" $src "" testcase
# If we couldn't rip $srcdir out of `src' then just do the best we can.
# The point is to reduce the unnecessary noise in the logs. Don't strip
@ -158,7 +158,7 @@ proc fortran-torture-execute { src } {
# Setup the options for the testcase run.
set option_list $TORTURE_OPTIONS
set executable $tmpdir/[file tail [file rootname $src].x]
regsub "^$srcdir/?" $src "" testcase
regsub "(?q)$srcdir/" $src "" testcase
# If we couldn't rip $srcdir out of `src' then just do the best we can.
# The point is to reduce the unnecessary noise in the logs. Don't strip

View File

@ -88,7 +88,7 @@ proc objc-torture-compile { src option } {
set output "$tmpdir/[file tail [file rootname $src]].o"
regsub "^$srcdir/?" $src "" testcase
regsub "(?q)$srcdir/" $src "" testcase
# If we couldn't rip $srcdir out of `src' then just do the best we can.
# The point is to reduce the unnecessary noise in the logs. Don't strip
# out too much because different testcases with the same name can confuse
@ -146,7 +146,7 @@ proc objc-torture-execute { src args } {
set executable $tmpdir/[file tail [file rootname $src].x]
regsub "^$srcdir/?" $src "" testcase
regsub "(?q)$srcdir/" $src "" testcase
# If we couldn't rip $srcdir out of `src' then just do the best we can.
# The point is to reduce the unnecessary noise in the logs. Don't strip
# out too much because different testcases with the same name can confuse

View File

@ -221,7 +221,7 @@ proc profopt-execute { src } {
error "No feedback option specified for second compile."
}
regsub "^$srcdir/?" $src "" testcase
regsub "(?q)$srcdir/" $src "" testcase
# If we couldn't rip $srcdir out of `src' then just do the best we can.
# The point is to reduce the unnecessary noise in the logs. Don't strip
# out too much because different testcases with the same name can confuse