sl@0: # 2008 Jan 22
sl@0: #
sl@0: # The author disclaims copyright to this source code.  In place of
sl@0: # a legal notice, here is a blessing:
sl@0: #
sl@0: #    May you do good and not evil.
sl@0: #    May you find forgiveness for yourself and forgive others.
sl@0: #    May you share freely, never taking more than you give.
sl@0: #
sl@0: #***********************************************************************
sl@0: #
sl@0: # $Id: filectrl.test,v 1.1 2008/01/22 14:50:17 drh Exp $
sl@0: 
sl@0: set testdir [file dirname $argv0]
sl@0: source $testdir/tester.tcl
sl@0: 
sl@0: 
sl@0: do_test filectrl-1.1 {
sl@0:   file_control_test db
sl@0: } {}
sl@0: do_test filectrl-1.2 {
sl@0:   db eval {CREATE TEMP TABLE x(y);}
sl@0:   file_control_test db
sl@0: } {}
sl@0: do_test filectrl-1.3 {
sl@0:   db close
sl@0:   sqlite3 db :memory:
sl@0:   file_control_test db
sl@0: } {}
sl@0: 
sl@0: finish_test