Import SQLite 3.10.2.

third_party/sqlite/src/test/fts3fault.test

 # 2010 June 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.
 #
 #***********************************************************************
 #
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 
 set ::testprefix fts3fault
 
 # If SQLITE_ENABLE_FTS3 is not defined, omit this file.
 ifcapable !fts3 { finish_test ; return }
 
+if 0 {
+
 # Test error handling in the sqlite3Fts3Init() function. This is the 
 # function that registers the FTS3 module and various support functions
 # with SQLite.
 #
 do_faultsim_test 1 -body { 
   sqlite3 db test.db 
   expr 0
 } -test {
   catch { db close }
 }
@@ skipping 119 matching lines @@
 do_faultsim_test 7.3 -prep { 
   faultsim_delete_and_reopen
 } -body {
   execsql { CREATE VIRTUAL TABLE t1 USING fts4(a, b, matchnfo=fts3) }
 } -test {
   faultsim_test_result {1 {unrecognized parameter: matchnfo=fts3}} \
                        {1 {vtable constructor failed: t1}} \
                        {1 {SQL logic error or missing database}}
 }
 
+
+}
+
 proc mit {blob} {
   set scan(littleEndian) i*
   set scan(bigEndian) I*
   binary scan $blob $scan($::tcl_platform(byteOrder)) r
   return $r
 }
 
 do_test 8.0 {
   faultsim_delete_and_reopen
   execsql { CREATE VIRTUAL TABLE t8 USING fts4 }
   execsql "INSERT INTO t8 VALUES('a b c')"
   execsql "INSERT INTO t8 VALUES('b b b')"
   execsql "INSERT INTO t8 VALUES('[string repeat {c } 50000]')"
   execsql "INSERT INTO t8 VALUES('d d d')"
   execsql "INSERT INTO t8 VALUES('e e e')"
   execsql "INSERT INTO t8(t8) VALUES('optimize')"
   faultsim_save_and_close
 } {}
 
-do_faultsim_test 8.1 -prep { 
+do_faultsim_test 8.1 -faults oom-t* -prep { 
   faultsim_restore_and_reopen
   db func mit mit
 } -body {
   execsql { SELECT mit(matchinfo(t8, 'x')) FROM t8 WHERE t8 MATCH 'a b c' }
 } -test {
   faultsim_test_result {0 {{1 1 1 1 4 2 1 5 5}}}
 }
+
 do_faultsim_test 8.2 -faults oom-t* -prep { 
   faultsim_restore_and_reopen
   db func mit mit
 } -body {
   execsql { SELECT mit(matchinfo(t8, 's')) FROM t8 WHERE t8 MATCH 'a b c' }
 } -test {
   faultsim_test_result {0 3}
 }
 do_faultsim_test 8.3 -prep { 
   faultsim_restore_and_reopen
@@ skipping 25 matching lines @@
 } {}
 do_faultsim_test 9.1 -prep {
   faultsim_restore_and_reopen
 } -body {
   execsql { SELECT offsets(t9) FROM t9 WHERE t9 MATCH 'to*' }
 } -test {
   faultsim_test_result {0 {{0 0 20 39 0 0 64 2}}}
 }
 
 finish_test