From 16e9c9214d62731269144d54a3a996886008249b Mon Sep 17 00:00:00 2001 From: mike Date: Fri, 29 Jun 2007 11:47:25 +0000 Subject: [PATCH] Clearer diagnostics when output differs. --- test/regression/runtests | 5 ++--- 1 file changed, 2 insertions(+), 3 deletions(-) diff --git a/test/regression/runtests b/test/regression/runtests index 070a921..de8b38e 100755 --- a/test/regression/runtests +++ b/test/regression/runtests @@ -1,6 +1,6 @@ #!/usr/bin/perl -w -# $Id: runtests,v 1.10 2007-06-21 14:54:32 mike Exp $ +# $Id: runtests,v 1.11 2007-06-29 11:47:25 mike Exp $ use IO::File; use strict; @@ -37,8 +37,7 @@ while () { print "OK\n"; $ncorrect++; } else { - print "\n *** different XCQL output\n"; - print "=== correct ===\n$correct"; + print "\n *** XCQL output differs from $afile\n"; print "=== tested ===\n$tested"; print "=== end ===\n"; } -- 1.7.10.4