summaryrefslogtreecommitdiff
path: root/storage/bdb/test/lock003.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'storage/bdb/test/lock003.tcl')
-rw-r--r--storage/bdb/test/lock003.tcl10
1 files changed, 6 insertions, 4 deletions
diff --git a/storage/bdb/test/lock003.tcl b/storage/bdb/test/lock003.tcl
index 91a8a2e90f6..a535142838c 100644
--- a/storage/bdb/test/lock003.tcl
+++ b/storage/bdb/test/lock003.tcl
@@ -1,9 +1,9 @@
# See the file LICENSE for redistribution information.
#
-# Copyright (c) 1996-2002
+# Copyright (c) 1996-2004
# Sleepycat Software. All rights reserved.
#
-# $Id: lock003.tcl,v 11.25 2002/09/05 17:23:06 sandstro Exp $
+# $Id: lock003.tcl,v 11.28 2004/01/28 03:36:28 bostic Exp $
#
# TEST lock003
# TEST Exercise multi-process aspects of lock. Generate a bunch of parallel
@@ -55,8 +55,10 @@ proc lock003 { {iter 500} {max 1000} {procs 5} } {
watch_procs $pidlist 30 10800
# Check for test failure
- set e [eval findfail [glob $testdir/lock003.*.out]]
- error_check_good "FAIL: error message(s) in log files" $e 0
+ set errstrings [eval findfail [glob $testdir/lock003.*.out]]
+ foreach str $errstrings {
+ puts "FAIL: error message in .out file: $str"
+ }
# Remove log files
for { set i 0 } {$i < $procs} {incr i} {