Lines Matching refs:env
37 # If we are given an env, use it. Otherwise, open one.
39 set eindex [lsearch -exact $args "-env"]
42 set env [berkdb_env -create -home $testdir]
43 error_check_good env_open [is_valid_env $env] TRUE
46 set env [lindex $args $eindex]
47 set envflags [$env get_open_flags]
48 set txnenv [is_txnenv $env]
52 set testdir [get_home $env]
57 set db [eval {berkdb_open -env $env -create -mode 0644} \
94 set db [eval {berkdb_open -env $env -create -excl -mode 0644} \
99 set ret [catch {eval {berkdb_open_noerr -env $env -create -excl \
103 # Clean up. Close the env if this test created it.
106 error_check_good env_close [$env close] 0