| Index: third_party/sqlite/src/ext/rbu/rbu5.test
|
| diff --git a/third_party/sqlite/src/ext/rbu/rbu5.test b/third_party/sqlite/src/ext/rbu/rbu5.test
|
| index 9a0f17bc5d72be90af9577a80275057aac8ae513..8e4ae8cb695d6072ea6978aa7d3ded68895fdd8e 100644
|
| --- a/third_party/sqlite/src/ext/rbu/rbu5.test
|
| +++ b/third_party/sqlite/src/ext/rbu/rbu5.test
|
| @@ -12,35 +12,10 @@
|
| # Test some properties of the pager_rbu_mode and rbu_mode pragmas.
|
| #
|
|
|
| -if {![info exists testdir]} {
|
| - set testdir [file join [file dirname [info script]] .. .. test]
|
| -}
|
| -source $testdir/tester.tcl
|
| +source [file join [file dirname [info script]] rbu_common.tcl]
|
| set ::testprefix rbu5
|
|
|
|
|
| -# Run the RBU in file $rbu on target database $target until completion.
|
| -#
|
| -proc run_rbu {target rbu} {
|
| - sqlite3rbu rbu $target $rbu
|
| - while { [rbu step]=="SQLITE_OK" } {}
|
| - rbu close
|
| -}
|
| -
|
| -
|
| -# Run the RBU in file $rbu on target database $target one step at a
|
| -# time until completion.
|
| -#
|
| -proc step_rbu {target rbu} {
|
| - while 1 {
|
| - sqlite3rbu rbu $target $rbu
|
| - set rc [rbu step]
|
| - rbu close
|
| - if {$rc != "SQLITE_OK"} break
|
| - }
|
| - set rc
|
| -}
|
| -
|
| # Return a list of the primary key columns for table $tbl in the database
|
| # opened by database handle $db.
|
| #
|
|
|