1
0
mirror of https://github.com/sqlite/sqlite.git synced 2025-07-30 19:03:16 +03:00

Fix a test bug causing a segfault in bind.test. (CVS 2288)

FossilOrigin-Name: a8b921d45ec9ef4d16ef7b5bf09aabaf02ebc70b
This commit is contained in:
danielk1977
2005-01-29 09:00:49 +00:00
parent f7c9bfead4
commit 494fa66d19
3 changed files with 9 additions and 10 deletions

View File

@ -11,7 +11,7 @@
# This file implements regression tests for SQLite library. The
# focus of this script testing the sqlite_bind API.
#
# $Id: bind.test,v 1.28 2005/01/29 08:32:46 danielk1977 Exp $
# $Id: bind.test,v 1.29 2005/01/29 09:00:49 danielk1977 Exp $
#
set testdir [file dirname $argv0]
@ -378,7 +378,6 @@ do_test bind-9.7 {
ifcapable {tclvar} {
do_test bind-10.1 {
catch {sqlite3_finalize $VM}
set VM [
sqlite3_prepare $DB {
INSERT INTO t2(a,b,c,d,e,f) VALUES(:abc,$abc,:abc,$ab,$abc,:abc)
@ -391,7 +390,6 @@ ifcapable {tclvar} {
}
ifcapable {!tclvar} {
do_test bind-10.1 {
catch {sqlite3_finalize $VM}
set VM [
sqlite3_prepare $DB {
INSERT INTO t2(a,b,c,d,e,f) VALUES(:abc,:xyz,:abc,:xy,:xyz,:abc)
@ -445,6 +443,7 @@ do_test bind-10.8.1 {
do_test bind-10.9 {
sqlite3_finalize $VM
} SQLITE_OK
breakpoint
do_test bind-10.10 {
execsql {SELECT * FROM t2}
} {1 999 1000 1001 {} {} 1 2 1 3 2 1}