database/sqlite
1
0
Fork 0
mirror of https://github.com/sqlite/sqlite.git synced 2025-08-01 06:27:03 +03:00
Code Activity

Test sqlite3_bind_zeroblob(). Only include sqlite3Utf8To8 in builds if SQLITE_DEBUG is defined. (CVS 4363)

Browse Source 
FossilOrigin-Name: fde6142b7bb33198b3d6b65cfbddfad61694b1fb
This commit is contained in:
danielk1977
2007-09-01 11:04:26 +00:00
parent b8cdbec246
commit 28c66307d7
8 changed files with 49 additions and 23 deletions
Download Patch File Download Diff File Expand all files Collapse all files

16
test/zeroblob.test
View File

@ -13,7 +13,7 @@
# including the sqlite3_bind_zeroblob(), sqlite3_result_zeroblob(),
# and the built-in zeroblob() SQL function.
#
# $Id: zeroblob.test,v 1.6 2007/06/07 19:08:34 drh Exp $
# $Id: zeroblob.test,v 1.7 2007/09/01 11:04:28 danielk1977 Exp $
set testdir [file dirname $argv0]
source $testdir/tester.tcl
@ -176,4 +176,18 @@ do_test zeroblob-6.5 {
catchsql {select zeroblob(2147483648)}
} {1 {string or blob too big}}
# Test bind_zeroblob()
#
do_test zeroblob-7.1 {
set ::STMT [sqlite3_prepare $::DB "SELECT length(?)" -1 DUMMY]
sqlite3_bind_zeroblob $::STMT 1 450
sqlite3_step $::STMT
} {SQLITE_ROW}
do_test zeroblob-7.2 {
sqlite3_column_int $::STMT 0
} {450}
do_test zeroblob-7.3 {
sqlite3_finalize $::STMT
} {SQLITE_OK}
finish_test