mirror of
https://github.com/sqlite/sqlite.git
synced 2025-07-27 20:41:58 +03:00
The sqlite TCL command no longer returns the hex address of the sqlite3*
structure. Instead there is a new command in testfixture to find that information. (CVS 2852) FossilOrigin-Name: 70b228575e045bc56013aab945334203ceb31d8b
This commit is contained in:
@ -11,7 +11,7 @@
|
||||
# This file implements regression tests for SQLite library. The
|
||||
# focus of this script testing the callback-free C/C++ API.
|
||||
#
|
||||
# $Id: capi3.test,v 1.35 2005/12/16 01:06:18 drh Exp $
|
||||
# $Id: capi3.test,v 1.36 2006/01/03 00:33:50 drh Exp $
|
||||
#
|
||||
|
||||
set testdir [file dirname $argv0]
|
||||
@ -51,8 +51,7 @@ proc utf8 {str} {
|
||||
# capi3-6.*: Test that sqlite3_close fails if there are outstanding VMs.
|
||||
#
|
||||
|
||||
db close
|
||||
set DB [sqlite3 db test.db]
|
||||
set DB [sqlite3_connection_pointer db]
|
||||
|
||||
do_test capi3-1.0 {
|
||||
sqlite3_get_autocommit $DB
|
||||
@ -463,7 +462,8 @@ set ::ENC [execsql {pragma encoding}]
|
||||
db close
|
||||
|
||||
do_test capi3-6.0 {
|
||||
set DB [sqlite3_open test.db]
|
||||
sqlite3 db test.db
|
||||
set DB [sqlite3_connection_pointer db]
|
||||
sqlite3_key $DB xyzzy
|
||||
set sql {SELECT a FROM t1 order by rowid}
|
||||
set STMT [sqlite3_prepare $DB $sql -1 TAIL]
|
||||
@ -482,6 +482,7 @@ do_test capi3-6.3 {
|
||||
do_test capi3-6.4 {
|
||||
sqlite3_close $DB
|
||||
} {SQLITE_OK}
|
||||
db close
|
||||
|
||||
if {![sqlite3 -has-codec]} {
|
||||
# Test what happens when the library encounters a newer file format.
|
||||
@ -610,7 +611,8 @@ foreach {code english} $code2english {
|
||||
if {[info command sqlite_malloc_stat]!=""} {
|
||||
set sqlite_malloc_fail 1
|
||||
do_test capi3-10-1 {
|
||||
set ::DB [sqlite3 db test.db]
|
||||
sqlite3 db test.db
|
||||
set DB [sqlite3_connection_pointer db]
|
||||
sqlite_malloc_fail 1
|
||||
catchsql {
|
||||
select * from sqlite_master;
|
||||
@ -631,7 +633,8 @@ sqlite_malloc_fail 0
|
||||
# The following tests - capi3-11.* - test that a COMMIT or ROLLBACK
|
||||
# statement issued while there are still outstanding VMs that are part of
|
||||
# the transaction fails.
|
||||
set DB [sqlite3 db test.db]
|
||||
sqlite3 db test.db
|
||||
set DB [sqlite3_connection_pointer db]
|
||||
sqlite_register_test_function $DB func
|
||||
do_test capi3-11.1 {
|
||||
execsql {
|
||||
|
Reference in New Issue
Block a user