# 2007 April 9 # # The author disclaims copyright to this source code. # #************************************************************************* # This file implements regression tests for SQLite library. fts2 # DELETE handling assumed all fields were non-null. This was not # the intention at all. # # $Id: fts2m.test,v 1.1 2007/04/09 20:45:42 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 } db eval { CREATE VIRTUAL TABLE t1 USING fts2(col_a, col_b); INSERT INTO t1(rowid, col_a, col_b) VALUES(1, 'testing', 'testing'); INSERT INTO t1(rowid, col_a, col_b) VALUES(2, 'only a', null); INSERT INTO t1(rowid, col_a, col_b) VALUES(3, null, 'only b'); INSERT INTO t1(rowid, col_a, col_b) VALUES(4, null, null); } do_test fts2m-1.0 { execsql { SELECT COUNT(col_a), COUNT(col_b), COUNT(*) FROM t1; } } {2 2 4} do_test fts2m-1.1 { execsql { DELETE FROM t1 WHERE rowid = 1; SELECT COUNT(col_a), COUNT(col_b), COUNT(*) FROM t1; } } {1 1 3} do_test fts2m-1.2 { execsql { DELETE FROM t1 WHERE rowid = 2; SELECT COUNT(col_a), COUNT(col_b), COUNT(*) FROM t1; } } {0 1 2} do_test fts2m-1.3 { execsql { DELETE FROM t1 WHERE rowid = 3; SELECT COUNT(col_a), COUNT(col_b), COUNT(*) FROM t1; } } {0 0 1} do_test fts2m-1.4 { execsql { DELETE FROM t1 WHERE rowid = 4; SELECT COUNT(col_a), COUNT(col_b), COUNT(*) FROM t1; } } {0 0 0} finish_test