test/fts1n.test

   1 # 2007 July 24
   2 #
   3 # The author disclaims copyright to this source code.  In place of
   4 # a legal notice, here is a blessing:
   5 #
   6 #    May you do good and not evil.
   7 #    May you find forgiveness for yourself and forgive others.
   8 #    May you share freely, never taking more than you give.
   9 #
  10 #*************************************************************************
  11 # This file implements regression tests for SQLite library.  The focus
  12 # of this script is testing the FTS1 module for errors in the handling
  13 # of SQLITE_SCHEMA.
  14 #
  15 # $Id: fts1n.test,v 1.1 2007/07/25 00:38:06 shess Exp $
  16 #
  17
  18 set testdir [file dirname $argv0]
  19 source $testdir/tester.tcl
  20
  21 # If SQLITE_ENABLE_FTS1 is not defined, omit this file.
  22 ifcapable !fts1 {
  23   finish_test
  24   return
  25 }
  26
  27 do_test fts1m-1.1 {
  28   execsql {
  29     CREATE VIRTUAL TABLE t1 USING fts1(a, b, c);
  30     INSERT INTO t1(a, b, c) VALUES('one three four', 'one four', 'one two');
  31     SELECT a, b, c FROM t1 WHERE c MATCH 'two';
  32   }
  33 } {{one three four} {one four} {one two}}
  34
  35 # This test was crashing at one point.
  36 #
  37 do_test fts1m-1.2 {
  38   execsql {
  39     SELECT a, b, c FROM t1 WHERE c MATCH 'two';
  40     CREATE TABLE t3(a, b, c);
  41     SELECT a, b, c FROM t1 WHERE  c  MATCH 'two';
  42   }
  43 } {{one three four} {one four} {one two} {one three four} {one four} {one two}}
  44
  45 finish_test