recover_common.tcl 218 B

123456789101112131415
  1. if {![info exists testdir]} {
  2. set testdir [file join [file dirname [info script]] .. .. test]
  3. }
  4. source $testdir/tester.tcl
  5. if {[info commands sqlite3_recover_init]==""} {
  6. finish_test
  7. return -code return
  8. }