# See the file LICENSE for redistribution information. # # Copyright (c) 1999-2002 # Sleepycat Software. All rights reserved. # # $Id: test071.tcl,v 1.1.1.1 2003/02/15 04:56:17 zarzycki Exp $ # # 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. proc test071 { method {nconsumers 1} {nproducers 1}\ {nitems 10000} {mode CONSUME} {start 0 } {txn -txn} {tnum 71} args } { eval test070 $method \ $nconsumers $nproducers $nitems $mode $start $txn $tnum $args }