diff options
Diffstat (limited to 'storage/bdb/test/test009.tcl')
| -rw-r--r-- | storage/bdb/test/test009.tcl | 18 |
1 files changed, 18 insertions, 0 deletions
diff --git a/storage/bdb/test/test009.tcl b/storage/bdb/test/test009.tcl new file mode 100644 index 00000000000..7ef46d8c818 --- /dev/null +++ b/storage/bdb/test/test009.tcl @@ -0,0 +1,18 @@ +# See the file LICENSE for redistribution information. +# +# Copyright (c) 1996-2002 +# Sleepycat Software. All rights reserved. +# +# $Id: test009.tcl,v 11.8 2002/05/22 15:42:45 sue Exp $ +# +# TEST test009 +# TEST Small keys/large data +# TEST Same as test008; close and reopen database +# TEST +# TEST Check that we reuse overflow pages. Create database with lots of +# TEST big key/data pairs. Go through and delete and add keys back +# TEST randomly. Then close the DB and make sure that we have everything +# TEST we think we should. +proc test009 { method args} { + eval {test008 $method 9 0} $args +} |