summaryrefslogtreecommitdiff
path: root/storage/bdb/test/test083.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'storage/bdb/test/test083.tcl')
-rw-r--r--storage/bdb/test/test083.tcl8
1 files changed, 6 insertions, 2 deletions
diff --git a/storage/bdb/test/test083.tcl b/storage/bdb/test/test083.tcl
index e4168ee1c43..7e4a8b960a4 100644
--- a/storage/bdb/test/test083.tcl
+++ b/storage/bdb/test/test083.tcl
@@ -1,14 +1,18 @@
# See the file LICENSE for redistribution information.
#
-# Copyright (c) 2000-2002
+# Copyright (c) 2000-2004
# Sleepycat Software. All rights reserved.
#
-# $Id: test083.tcl,v 11.13 2002/06/24 14:06:38 sue Exp $
+# $Id: test083.tcl,v 11.16 2004/01/28 03:36:31 bostic Exp $
#
# TEST test083
# TEST Test of DB->key_range.
proc test083 { method {pgsz 512} {maxitems 5000} {step 2} args} {
source ./include.tcl
+
+ global rand_init
+ error_check_good set_random_seed [berkdb srand $rand_init] 0
+
set omethod [convert_method $method]
set args [convert_args $method $args]