mirror of
https://github.com/sqlite/sqlite.git
synced 2025-07-29 08:01:23 +03:00
Change the name of the TCL command from "sqlite" to "sqlite3" so that both
SQLite version 2 and SQLite version 3 can be used by Tcl at the same time. (CVS 1626) FossilOrigin-Name: d705d051bed2b92b6c3bbcc75fe5b056633b9c31
This commit is contained in:
@ -11,7 +11,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.14 2003/05/04 17:58:27 drh Exp $
|
||||
# $Id: main.test,v 1.15 2004/06/19 00:16:31 drh Exp $
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
source $testdir/tester.tcl
|
||||
@ -242,7 +242,7 @@ do_test main-2.0 {
|
||||
set fd [open test.db w]
|
||||
puts $fd hi!
|
||||
close $fd
|
||||
set v [catch {sqlite db test.db} msg]
|
||||
set v [catch {sqlite3 db test.db} msg]
|
||||
if {$v} {lappend v $msg} {lappend v {}}
|
||||
} {0 {}}
|
||||
|
||||
@ -252,7 +252,7 @@ do_test main-3.1 {
|
||||
catch {db close}
|
||||
foreach f [glob -nocomplain testdb/*] {file delete -force $f}
|
||||
file delete -force testdb
|
||||
sqlite db testdb
|
||||
sqlite3 db testdb
|
||||
set v [catch {execsql {SELECT * from T1 where x!!5}} msg]
|
||||
lappend v $msg
|
||||
} {1 {unrecognized token: "!!"}}
|
||||
@ -260,7 +260,7 @@ do_test main-3.2 {
|
||||
catch {db close}
|
||||
foreach f [glob -nocomplain testdb/*] {file delete -force $f}
|
||||
file delete -force testdb
|
||||
sqlite db testdb
|
||||
sqlite3 db testdb
|
||||
set v [catch {execsql {SELECT * from T1 where @x}} msg]
|
||||
lappend v $msg
|
||||
} {1 {unrecognized token: "@"}}
|
||||
@ -269,7 +269,7 @@ do_test main-3.3 {
|
||||
catch {db close}
|
||||
foreach f [glob -nocomplain testdb/*] {file delete -force $f}
|
||||
file delete -force testdb
|
||||
sqlite db testdb
|
||||
sqlite3 db testdb
|
||||
execsql {
|
||||
create table T1(X REAL);
|
||||
insert into T1 values(0.5);
|
||||
|
Reference in New Issue
Block a user