diff options
Diffstat (limited to 'storage/bdb/test/test041.tcl')
-rw-r--r-- | storage/bdb/test/test041.tcl | 17 |
1 files changed, 17 insertions, 0 deletions
diff --git a/storage/bdb/test/test041.tcl b/storage/bdb/test/test041.tcl new file mode 100644 index 00000000000..fdcbdbef3d7 --- /dev/null +++ b/storage/bdb/test/test041.tcl @@ -0,0 +1,17 @@ +# See the file LICENSE for redistribution information. +# +# Copyright (c) 1996-2002 +# Sleepycat Software. All rights reserved. +# +# $Id: test041.tcl,v 11.6 2002/01/11 15:53:47 bostic Exp $ +# +# TEST test041 +# TEST Test039 with off-page duplicates +# TEST DB_GET_BOTH functionality with off-page duplicates. +proc test041 { method {nentries 10000} args} { + # Test with off-page duplicates + eval {test039 $method $nentries 20 41 -pagesize 512} $args + + # Test with multiple pages of off-page duplicates + eval {test039 $method [expr $nentries / 10] 100 41 -pagesize 512} $args +} |