Import SQLite 3.8.7.4.

third_party/sqlite/src/test/createtab.test

 # 2007 May 02
 #
 # The author disclaims copyright to this source code.  In place of
 # a legal notice, here is a blessing:
 #
 #    May you do good and not evil.
 #    May you find forgiveness for yourself and forgive others.
 #    May you share freely, never taking more than you give.
 #
 #***********************************************************************
 # This file implements regression tests for SQLite library.  The
 # focus of this file is testing that it is OK to create new tables
 # and indices while creating existing tables and indices.
 #
 # $Id: createtab.test,v 1.3 2007/09/12 17:01:45 danielk1977 Exp $
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 
 ifcapable autovacuum {
   set upperBound 2
 } else {
   set upperBound 0
 }
 
 # Run these tests for all possible values of autovacuum.
 #
 for {set av 0} {$av<=$upperBound} {incr av} {
   db close
-  file delete -force test.db test.db-journal
+  forcedelete test.db test.db-journal
   sqlite3 db test.db
 
   # Create a table that spans multiple pages.  It is important
   # that part of the database be in pages beyond the root page.
   #
   do_test createtab-$av.1 {
     execsql "PRAGMA auto_vacuum=$av"
     execsql {
       PRAGMA page_size=1024;
       CREATE TABLE t1(x INTEGER PRIMARY KEY, y);
@@ skipping 96 matching lines @@
   do_test createtab-$av.32 {
     execsql {
       SELECT name FROM sqlite_master WHERE type='table' ORDER BY 1
     }
   } {t1 t2 t3 t4}
   integrity_check createtab-$av.40
 
 }
   
 finish_test