Lines Matching refs:txn
7 proc do_op {omethod op names txn env {largs ""}} {
10 rename { do_rename $names $txn $env }
11 remove { do_remove $names $txn $env }
13 open_create { do_create $omethod $names $txn $env $largs }
14 open { do_open $omethod $names $txn $env $largs }
15 open_excl { do_create_excl $omethod $names $txn $env $largs }
16 truncate { do_truncate $omethod $names $txn $env $largs }
21 proc do_subdb_op {omethod op names txn env {largs ""}} {
28 rename { do_subdb_rename $names $txn $env }
29 remove { do_subdb_remove $names $txn $env }
35 proc do_inmem_op {omethod op names txn env {largs ""}} {
43 rename { do_inmem_rename $names $txn $env }
44 remove { do_inmem_remove $names $txn $env }
46 open_create { do_inmem_create $omethod $names $txn $env $largs }
47 open { do_inmem_open $omethod $names $txn $env $largs }
48 open_excl { do_inmem_create_excl $omethod $names $txn $env $largs }
49 truncate { do_inmem_truncate $omethod $names $txn $env $largs }
76 proc do_rename {names txn env} {
81 if {[catch {eval $env dbrename -txn $txn \
89 proc do_subdb_rename {names txn env} {
95 if {[catch {eval $env dbrename -txn $txn $filename \
103 proc do_inmem_rename {names txn env} {
108 if {[catch {eval $env dbrename -txn $txn {$filename} \
117 proc do_remove {names txn env} {
118 if {[catch {eval $env dbremove -txn $txn $names} result]} {
125 proc do_subdb_remove {names txn env} {
128 if {[catch {eval $env dbremove -txn $txn $filename $subname} result]} {
135 proc do_inmem_remove {names txn env} {
136 if {[catch {eval $env dbremove -txn $txn {""} $names} result]} {
143 proc do_create {omethod names txn env {largs ""}} {
145 -txn $txn $names} result]} {
152 proc do_inmem_create {omethod names txn env {largs ""}} {
154 -txn $txn "" $names} result]} {
161 proc do_open {omethod names txn env {largs ""}} {
163 -txn $txn $names} result]} {
170 proc do_inmem_open {omethod names txn env {largs ""}} {
172 -txn $txn {""} $names} result]} {
179 proc do_create_excl {omethod names txn env {largs ""}} {
181 -txn $txn $names} result]} {
188 proc do_inmem_create_excl {omethod names txn env {largs ""}} {
190 -txn $txn {""} $names} result]} {
197 proc do_truncate {omethod names txn env {largs ""}} {
201 set db [eval {berkdb_open $omethod} $largs {-env $env -txn $txn $names}]
204 if {[catch {$db truncate -txn $txn} result]} {
211 proc do_inmem_truncate {omethod names txn env {largs ""}} {
212 set db [eval {berkdb_open $omethod} $largs {-env $env -txn $txn "" $names}]
215 if {[catch {$db truncate -txn $txn} result]} {