Import SQLite 3.7.6.3.

third_party/sqlite/src/test/malloc.test

 # 2001 September 15
 #
 # 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 316 matching lines @@
     }
   }
 }
 
 if {$tcl_platform(platform)!="windows"} {
   do_malloc_test 14 -tclprep {
     catch {db close}
     sqlite3 db2 test2.db
     sqlite3_extended_result_codes db2 1
     db2 eval {
+      PRAGMA journal_mode = DELETE;    /* For inmemory_journal permutation */
       PRAGMA synchronous = 0;
       CREATE TABLE t1(a, b);
       INSERT INTO t1 VALUES(1, 2);
       BEGIN;
       INSERT INTO t1 VALUES(3, 4);
     }
     copy_file test2.db test.db
     copy_file test2.db-journal test.db-journal
     db2 close
   } -tclbody {
@@ skipping 512 matching lines @@
     # succeed. If [db] has not released the lock, this should hit an 
     # SQLITE_BUSY error.
     do_test malloc-36.$zRepeat.${::n}.unlocked {
       execsql {INSERT INTO t1 VALUES(3, 4)} db2
     } {}
     db2 close
   }
   catch { db2 close }
 }
 
-ifcapable stat2 {
+ifcapable stat2&&utf16 {
   do_malloc_test 38 -tclprep {
     add_test_collate db 0 0 1
     execsql {
       ANALYZE;
       CREATE TABLE t4(x COLLATE test_collate);
       CREATE INDEX t4x ON t4(x);
       INSERT INTO sqlite_stat2 VALUES('t4', 't4x', 0, 'aaa');
       INSERT INTO sqlite_stat2 VALUES('t4', 't4x', 1, 'aaa');
       INSERT INTO sqlite_stat2 VALUES('t4', 't4x', 2, 'aaa');
       INSERT INTO sqlite_stat2 VALUES('t4', 't4x', 3, 'aaa');
@@ skipping 14 matching lines @@
 }
 
 # Ensure that no file descriptors were leaked.
 do_test malloc-99.X {
   catch {db close}
   set sqlite_open_file_count
 } {0}
 
 puts open-file-count=$sqlite_open_file_count
 finish_test