AryaWu/sqlite

1# 2006 September 92#3# The author disclaims copyright to this source code.  In place of4# 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.  The12# focus of this script is testing the FTS3 module.13#14# $Id: fts3aa.test,v 1.1 2007/08/20 17:38:42 shess Exp $15#16 17set testdir [file dirname $argv0]18source $testdir/tester.tcl19set testprefix fts3f20 21# If SQLITE_ENABLE_FTS3 is defined, omit this file.22ifcapable !fts3 {23  finish_test24  return25}26 27do_execsql_test 1.0 {28  CREATE VIRTUAL TABLE ft USING fts3(x);29  BEGIN;30    INSERT INTO ft VALUES('a one'), ('b one'), ('c one');31}32 33do_test 1.1 {34  set ret [list]35  db eval { SELECT docid FROM ft WHERE ft MATCH 'one' } {36    if { $docid==2 } {37      db eval COMMIT38    }39    lappend ret $docid40  }41  set ret42} {1 2 3}43 44do_execsql_test 1.2 {45  BEGIN;46    INSERT INTO ft VALUES('a one'), ('b one'), ('c one');47}48 49do_execsql_test 1.3 {50  SELECT docid, optimize(ft) FROM ft WHERE ft MATCH 'one'51} {52  1 {Index optimized} 2 {Index already optimal} 3 {Index already optimal}53  4 {Index already optimal}54  5 {Index already optimal} 6 {Index already optimal}55}56 57finish_test58