diff options
Diffstat (limited to 'db/test/test041.tcl')
| -rw-r--r-- | db/test/test041.tcl | 14 |
1 files changed, 8 insertions, 6 deletions
diff --git a/db/test/test041.tcl b/db/test/test041.tcl index bba89f49b..45eb2819a 100644 --- a/db/test/test041.tcl +++ b/db/test/test041.tcl @@ -1,16 +1,18 @@ # See the file LICENSE for redistribution information. # -# Copyright (c) 1996, 1997, 1998, 1999, 2000 +# Copyright (c) 1996-2003 # Sleepycat Software. All rights reserved. # -# $Id: test041.tcl,v 11.3 2000/02/14 03:00:20 bostic Exp $ +# $Id: test041.tcl,v 11.8 2003/01/08 05:53:54 bostic Exp $ # -# DB Test 41 {access method} -# DB_GET_BOTH functionality with off-page duplicates. +# 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 + eval {test039 $method $nentries 20 "041" -pagesize 512} $args # Test with multiple pages of off-page duplicates - eval {test039 $method [expr $nentries / 10] 100 41 -pagesize 512} $args + eval {test039 $method [expr $nentries / 10] 100 "041" -pagesize 512} \ + $args } |