Lines Matching refs:txn
31 set txn ""
47 set env [eval {berkdb_env -create -home $testdir -txn} $encargs]
59 set txn [$env txn]
60 error_check_good txn [is_valid_txn $txn $env] TRUE
62 set ret [$db put -txn $txn key000$i $data$i]
65 error_check_good commit [$txn commit] 0
69 set txn [$env txn]
70 error_check_good txn [is_valid_txn $txn $env] TRUE
71 for {set i 0; set ret [$db get -txn $txn key000$i]} {\
73 incr i; set ret [$db get -txn $txn key000$i]} {
76 set dbc [$db cursor -txn $txn]
83 # Create child txn.
84 set ctxn [$env txn -parent $txn]
85 error_check_good ctxn [is_valid_txn $txn $env] TRUE
92 set ret [$db put -txn $ctxn key0$i $data$i]
94 set ret [$db put -txn $ctxn key00$i $data$i]
96 set ret [$db put -txn $ctxn key000$i $data$i]
118 set ret [$db put -txn $txn key0$i $data$i]
120 set ret [$db put -txn $txn key00$i $data$i]
122 set ret [$db put -txn $txn key000$i $data$i]
128 set ctxn [$env txn -parent $txn]
129 error_check_good ctxn [is_valid_txn $txn $env] TRUE
132 error_check_good db_del:$i [$db del -txn $ctxn key0$i] 0
135 [$db del -txn $ctxn key00$i] 0
138 [$db del -txn $ctxn key000$i] 0
160 error_check_good commit [$txn commit] 0