Import SQLite 3.8.7.4.

third_party/sqlite/src/test/crash3.test

 # 2007 August 23
 #
 # 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.
 #
 #***********************************************************************
@@ skipping 55 matching lines @@
   {INSERT INTO abc VALUES(4, 5, 6)}                    {1 2 3 4 5 6} \
   {DELETE FROM abc}                                    {}    \
   {INSERT INTO abc SELECT * FROM abc}                  {1 2 3 1 2 3} \
   {UPDATE abc SET a = 2}                               {2 2 3}       \
   {INSERT INTO abc VALUES(4, 5, randstr(1000,1000))}   {n/a} \
   {CREATE TABLE def(d, e, f)}                          {n/a} \
 ] {
   for {set ii 0} {$ii < 10} {incr ii} {
 
     db close
-    file delete -force test.db test.db-journal
+    forcedelete test.db test.db-journal
     sqlite3 db test.db
     do_test crash3-1.$tn.1 {
       execsql {
         PRAGMA page_size = 1024;
         BEGIN;
         CREATE TABLE abc(a, b, c);
         INSERT INTO abc VALUES(1, 2, 3);
         COMMIT;
       }
     } {}
@@ skipping 12 matching lines @@
       execsql { SELECT * FROM abc }
     } {1 2 3} $res2
 
     incr tn
   }
 }
 
 # This block tests both the IOCAP_SEQUENTIAL and IOCAP_SAFE_APPEND flags.
 #
 db close
-file delete -force test.db test.db-journal
+forcedelete test.db test.db-journal
 sqlite3 db test.db
 do_test crash3-2.0 {
   execsql {
     BEGIN;
     CREATE TABLE abc(a PRIMARY KEY, b, c);
     CREATE TABLE def(d PRIMARY KEY, e, f);
     PRAGMA default_cache_size = 10;
     INSERT INTO abc VALUES(randstr(10,1000),randstr(10,1000),randstr(10,1000));
     INSERT INTO abc 
       SELECT randstr(10,1000),randstr(10,1000),randstr(10,1000) FROM abc;
@@ skipping 50 matching lines @@
 }
 
 # The following block tests an interaction between IOCAP_ATOMIC and
 # IOCAP_SEQUENTIAL. At one point, if both flags were set, small
 # journal files that contained only a single page, but were required 
 # for some other reason (i.e. nTrunk) were not being written to
 # disk.
 #
 for {set ii 0} {$ii < 10} {incr ii} {
   db close
-  file delete -force test.db test.db-journal
+  forcedelete test.db test.db-journal
   crashsql -file test.db -char {sequential atomic} {
     CREATE TABLE abc(a, b, c);
   }
   sqlite3 db test.db
   do_test crash3-3.$ii {
     execsql {PRAGMA integrity_check}
   } {ok}
 }
 
 finish_test