Import SQLite 3.8.7.4.

third_party/sqlite/src/test/lock4.test

 # 2007 April 6
 #
 # 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 script is database locks.
 #
 # $Id: lock4.test,v 1.10 2009/05/06 00:52:41 drh Exp $
 
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 
 do_not_use_codec
 
 # Initialize the test.db database so that it is non-empty
 #
 do_test lock4-1.1 {
   db eval {
      PRAGMA auto_vacuum=OFF;
      CREATE TABLE t1(x);
   }
-  file delete -force test2.db test2.db-journal
+  forcedelete test2.db test2.db-journal
   sqlite3 db2 test2.db
   db2 eval {
      PRAGMA auto_vacuum=OFF;
      CREATE TABLE t2(x)
   }
   db2 close
   list [file size test.db] [file size test2.db]
 } {2048 2048}
 
 # Create a script to drive a separate process that will
@@ skipping 69 matching lines @@
      SELECT * FROM t2
   }
 } {2}
 
     
 do_test lock4-999.1 {
   rename db2 {}
 } {}
 
 finish_test