summaryrefslogtreecommitdiff
path: root/storage/bdb/test/test100.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'storage/bdb/test/test100.tcl')
-rw-r--r--storage/bdb/test/test100.tcl17
1 files changed, 17 insertions, 0 deletions
diff --git a/storage/bdb/test/test100.tcl b/storage/bdb/test/test100.tcl
new file mode 100644
index 00000000000..f80b2e526dd
--- /dev/null
+++ b/storage/bdb/test/test100.tcl
@@ -0,0 +1,17 @@
+# See the file LICENSE for redistribution information.
+#
+# Copyright (c) 2000-2002
+# Sleepycat Software. All rights reserved.
+#
+# $Id: test100.tcl,v 11.1 2002/08/15 20:55:20 sandstro Exp $
+#
+# TEST test100
+# TEST Test for functionality near the end of the queue
+# TEST using test025 (DB_APPEND).
+proc test100 { method {nentries 10000} {txn -txn} {tnum "100"} args} {
+ if { [is_queueext $method ] == 0 } {
+ puts "Skipping test0$tnum for $method."
+ return;
+ }
+ eval {test025 $method $nentries 4294967000 $tnum} $args
+}