summaryrefslogtreecommitdiff
path: root/storage/bdb/test/test034.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'storage/bdb/test/test034.tcl')
-rw-r--r--storage/bdb/test/test034.tcl17
1 files changed, 17 insertions, 0 deletions
diff --git a/storage/bdb/test/test034.tcl b/storage/bdb/test/test034.tcl
new file mode 100644
index 00000000000..647ad940815
--- /dev/null
+++ b/storage/bdb/test/test034.tcl
@@ -0,0 +1,17 @@
+# See the file LICENSE for redistribution information.
+#
+# Copyright (c) 1998-2002
+# Sleepycat Software. All rights reserved.
+#
+# $Id: test034.tcl,v 11.8 2002/01/11 15:53:46 bostic Exp $
+#
+# TEST test034
+# TEST test032 with off-page duplicates
+# TEST DB_GET_BOTH, DB_GET_BOTH_RANGE functionality with off-page duplicates.
+proc test034 { method {nentries 10000} args} {
+ # Test with off-page duplicates
+ eval {test032 $method $nentries 20 34 -pagesize 512} $args
+
+ # Test with multiple pages of off-page duplicates
+ eval {test032 $method [expr $nentries / 10] 100 34 -pagesize 512} $args
+}