test071.tcl 565 Bytes
Newer Older
1 2
# See the file LICENSE for redistribution information.
#
jimw@mysql.com's avatar
jimw@mysql.com committed
3
# Copyright (c) 1999-2004
4 5
#	Sleepycat Software.  All rights reserved.
#
jimw@mysql.com's avatar
jimw@mysql.com committed
6
# $Id: test071.tcl,v 11.14 2004/01/28 03:36:31 bostic Exp $
7
#
ram@mysql.r18.ru's avatar
ram@mysql.r18.ru committed
8 9 10
# TEST	test071
# TEST	Test of DB_CONSUME (One consumer, 10000 items.)
# TEST	This is DB Test 70, with one consumer, one producers, and 10000 items.
jimw@mysql.com's avatar
jimw@mysql.com committed
11 12
proc test071 { method {nconsumers 1} {nproducers 1} {nitems 10000} \
    {mode CONSUME} {start 0 } {txn -txn} {tnum "071"} args } {
13 14 15 16

	eval test070 $method \
	    $nconsumers $nproducers $nitems $mode $start $txn $tnum $args
}