diff options
Diffstat (limited to 'test/test071.tcl')
-rw-r--r-- | test/test071.tcl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/test/test071.tcl b/test/test071.tcl new file mode 100644 index 0000000..9c05502 --- /dev/null +++ b/test/test071.tcl @@ -0,0 +1,15 @@ +# See the file LICENSE for redistribution information. +# +# Copyright (c) 1999-2009 Oracle. All rights reserved. +# +# $Id$ +# +# 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 "071"} args } { + + eval test070 $method \ + $nconsumers $nproducers $nitems $mode $start $txn $tnum $args +} |