Commit 7a6d97a0 by Mark Mitchell

old-dejagnu.exp: Make it possible to XFAIL a test that causes an ICE.

	* lib/old-dejagnu.exp: Make it possible to XFAIL a test that
	causes an ICE.

From-SVN: r21918
parent 70c4c000
...@@ -384,10 +384,11 @@ proc old-dejagnu { compiler prog cflagsx default_cflags libs } { ...@@ -384,10 +384,11 @@ proc old-dejagnu { compiler prog cflagsx default_cflags libs } {
set expect_crash \ set expect_crash \
[process-option $prog "crash test - " "a crash" CRASH $text] [process-option $prog "crash test - " "a crash" CRASH $text]
if {$expect_crash == "XCRASH"} then { if {$expect_crash != ""
set expect_crash 0 && [lindex [lindex $expect_crash 0] 1] == "XCRASH"} then {
} else {
set expect_crash 1 set expect_crash 1
} else {
set expect_crash 0
} }
# #
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment