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

More MEM changes in the vdbe.c. Still will not compile. (CVS 1469)

FossilOrigin-Name: dbdd1a7f316e576d0611748ec63c9ef00d4c10db
This commit is contained in:
drh
2004-05-27 01:53:56 +00:00
parent ea61b2c4fc
commit eb2e176a12
13 changed files with 403 additions and 831 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.9 2004/05/26 10:11:07 danielk1977 Exp $
# $Id: bind.test,v 1.10 2004/05/27 01:53:56 drh Exp $
#
set testdir [file dirname $argv0]
@ -28,7 +28,7 @@ proc sqlite_step {stmt N VALS COLS} {
lappend cols [sqlite3_column_name $stmt $i]
}
for {set i 0} {$i < [sqlite3_data_count $stmt]} {incr i} {
lappend vals [sqlite3_column_data $stmt $i]
lappend vals [sqlite3_column_text $stmt $i]
}
return $rc

View File

@ -13,7 +13,7 @@
# various suported unicode encodings (UTF-8, UTF-16, UTF-16le and
# UTF-16be).
#
# $Id: enc2.test,v 1.2 2004/05/26 10:11:07 danielk1977 Exp $
# $Id: enc2.test,v 1.3 2004/05/27 01:53:56 drh Exp $
set testdir [file dirname $argv0]
source $testdir/tester.tcl
@ -91,12 +91,12 @@ do_test $t.6 {
do_test $t.7 {
set STMT [sqlite3_prepare $DB "SELECT a FROM t1 WHERE c>3;" -1 TAIL]
sqlite3_step $STMT
sqlite3_column_data $STMT 0
sqlite3_column_text $STMT 0
} {four}
do_test $t.8 {
sqlite3_step $STMT
utf8 [sqlite3_column_data16 $STMT 0]
utf8 [sqlite3_column_text16 $STMT 0]
} {five}
do_test $t.9 {
@ -123,7 +123,3 @@ foreach enc $encodings {
}
finish_test