Import SQLite 3.8.7.4.

third_party/sqlite/src/test/fts2j.test

 # 2007 February 6
 #
 # The author disclaims copyright to this source code.
 #
 #*************************************************************************
 # This file implements regression tests for SQLite library.  This
 # tests creating fts2 tables in an attached database.
 #
 # $Id: fts2j.test,v 1.1 2007/02/07 01:01:18 shess Exp $
 #
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 
 # If SQLITE_ENABLE_FTS2 is defined, omit this file.
 ifcapable !fts2 {
   finish_test
   return
 }
 
 # Clean up anything left over from a previous pass.
-file delete -force test2.db
-file delete -force test2.db-journal
+forcedelete test2.db
+forcedelete test2.db-journal
 sqlite3 db2 test2.db
 
 db eval {
   CREATE VIRTUAL TABLE t3 USING fts2(content);
   INSERT INTO t3 (rowid, content) VALUES(1, "hello world");
 }
 
 db2 eval {
   CREATE VIRTUAL TABLE t1 USING fts2(content);
   INSERT INTO t1 (rowid, content) VALUES(1, "hello world");
@@ skipping 43 matching lines @@
     INSERT INTO two.t3 (rowid, content) VALUES(2, "hello there");
     INSERT INTO two.t3 (rowid, content) VALUES(3, "cruel world");
     SELECT rowid FROM two.t3 WHERE t3 MATCH 'hello';
 
     DETACH DATABASE two;
   } db2
 } {2}
 catch {db eval {DETACH DATABASE two}}
 
 catch {db2 close}
-file delete -force test2.db
+forcedelete test2.db
 
 finish_test