mirror of
https://github.com/sqlite/sqlite.git
synced 2025-07-29 08:01:23 +03:00
:-) (CVS 100)
FossilOrigin-Name: 1d4fe5599ed0bae18dba5842ab7ea1d34b8ec3ad
This commit is contained in:
@ -23,7 +23,7 @@
|
||||
# This file implements regression tests for SQLite library. The
|
||||
# focus of this file is exercising the code in main.c.
|
||||
#
|
||||
# $Id: main.test,v 1.2 2000/06/08 16:26:25 drh Exp $
|
||||
# $Id: main.test,v 1.3 2000/06/16 20:51:26 drh Exp $
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@ -78,6 +78,13 @@ do_test main-3.2 {
|
||||
set v [catch {execsql {SELECT * from T1 where ~x}} msg]
|
||||
lappend v $msg
|
||||
} {1 {unrecognized token: "~"}}
|
||||
do_test main-3.3 {
|
||||
catch {db close}
|
||||
file delete -force testdb
|
||||
sqlite db testdb
|
||||
set v [catch {execsql {SELECT a|b from T1 where x}} msg]
|
||||
lappend v $msg
|
||||
} {1 {unrecognized token: "|"}}
|
||||
|
||||
do_test main-3.3 {
|
||||
catch {db close}
|
||||
|
Reference in New Issue
Block a user