summaryrefslogtreecommitdiff
path: root/bdb/test/test040.tcl
diff options
context:
space:
mode:
authorunknown <tim@threads.polyesthetic.msg>2001-03-04 19:42:05 -0500
committerunknown <tim@threads.polyesthetic.msg>2001-03-04 19:42:05 -0500
commitec6ae091617bdfdca9e65e8d3e65b950d234f676 (patch)
tree9dd732e08dba156ee3d7635caedc0dc3107ecac6 /bdb/test/test040.tcl
parent87d70fb598105b64b538ff6b81eef9da626255b1 (diff)
downloadmariadb-git-ec6ae091617bdfdca9e65e8d3e65b950d234f676.tar.gz
Import changeset
Diffstat (limited to 'bdb/test/test040.tcl')
-rw-r--r--bdb/test/test040.tcl16
1 files changed, 16 insertions, 0 deletions
diff --git a/bdb/test/test040.tcl b/bdb/test/test040.tcl
new file mode 100644
index 00000000000..912e1735d8e
--- /dev/null
+++ b/bdb/test/test040.tcl
@@ -0,0 +1,16 @@
+# See the file LICENSE for redistribution information.
+#
+# Copyright (c) 1998, 1999, 2000
+# Sleepycat Software. All rights reserved.
+#
+# $Id: test040.tcl,v 11.3 2000/02/14 03:00:20 bostic Exp $
+#
+# DB Test 40 {access method}
+# DB_GET_BOTH functionality with off-page duplicates.
+proc test040 { method {nentries 10000} args} {
+ # Test with off-page duplicates
+ eval {test038 $method $nentries 20 40 -pagesize 512} $args
+
+ # Test with multiple pages of off-page duplicates
+ eval {test038 $method [expr $nentries / 10] 100 40 -pagesize 512} $args
+}