From a73eb2fc2ca590788c6263ac541fe64012083e43 Mon Sep 17 00:00:00 2001 From: das Date: Sun, 30 Aug 2009 19:18:41 +0000 Subject: add "error:" to -verbose line test failure output to satisfy stricter log parsers like Xcode 3.2 --- library/tcltest/tcltest.tcl | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/library/tcltest/tcltest.tcl b/library/tcltest/tcltest.tcl index 52f7bf4..30a3591 100644 --- a/library/tcltest/tcltest.tcl +++ b/library/tcltest/tcltest.tcl @@ -16,7 +16,7 @@ # Contributions from Don Porter, NIST, 2002. (not subject to US copyright) # All rights reserved. # -# RCS: @(#) $Id: tcltest.tcl,v 1.103.2.1 2009/04/08 16:04:48 dgp Exp $ +# RCS: @(#) $Id: tcltest.tcl,v 1.103.2.2 2009/08/30 19:18:41 das Exp $ package require Tcl 8.5 ;# -verbose line uses [info frame] namespace eval tcltest { @@ -2104,7 +2104,7 @@ proc tcltest::test {name description args} { } } if {[info exists testLine]} { - puts [outputChannel] "$testFile:$testLine: test failed:\ + puts [outputChannel] "$testFile:$testLine: error: test failed:\ $name [string trim $description]" } } -- cgit v0.12