* lib/dg.exp (dg-test): Don't put the expected and actual output

	of a pattern test in the test name; send it to the log instead.

Signed-off-by: Ben Elliston <bje@gnu.org>

2 files changed, 8 insertions, 2 deletions

diff --git a/ChangeLog b/ChangeLog
index 038d3b7..c162568 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2013-12-08  Richard Sandiford  <rdsandiford@googlemail.com>
+
+	* lib/dg.exp (dg-test): Don't put the expected and actual output
+	of a pattern test in the test name; send it to the log instead.
+
 2013-11-01  Steve Ellcey  <sellcey@mips.com>
 
 	* Makefile.am (baseboard_SCRIPTS): Add multi-sim.exp baseboard.
diff --git a/lib/dg.exp b/lib/dg.exp
index 889585f..3eaccf1 100644
--- a/lib/dg.exp
+++ b/lib/dg.exp
@@ -851,10 +851,11 @@ proc dg-test { args } {
 		    }
 		    set texttmp [lindex ${dg-output-text} 1]
 		    if { ![regexp $texttmp ${output}] } {
-			fail "$name output pattern test, is ${output}, should match $texttmp"
+			fail "$name output pattern test"
+			send_log "Output was:\n${output}\nShould match:\n$texttmp\n"
 			verbose "Failed test for output pattern $texttmp" 3
 		    } else {
-			pass "$name output pattern test, $texttmp"
+			pass "$name output pattern test"
 			verbose "Passed test for output pattern $texttmp" 3
 		    }
 		    unset texttmp