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

General test coverage improvements. (CVS 3022)

Browse Source 
FossilOrigin-Name: 153940af5af4f775fa3b1784931d3fd1e41764c5
This commit is contained in:
danielk1977
2006-01-24 10:58:21 +00:00
parent a7531c699a
commit 161fb79619
9 changed files with 101 additions and 25 deletions
Download Patch File Download Diff File Expand all files Collapse all files

9
test/tclsqlite.test
View File

@ -15,7 +15,7 @@
# interface is pretty well tested. This file contains some addition
# tests for fringe issues that the main test suite does not cover.
#
# $Id: tclsqlite.test,v 1.50 2006/01/17 09:35:02 danielk1977 Exp $
# $Id: tclsqlite.test,v 1.51 2006/01/24 10:58:23 danielk1977 Exp $
set testdir [file dirname $argv0]
source $testdir/tester.tcl
@ -447,4 +447,11 @@ do_test tcl-11.3 {
db exists {SELECT 1 FROM t4 WHERE x==8}
} {0}
do_test tcl-12.1 {
unset -nocomplain a b c version
set version [db version]
scan $version "%d.%d.%d" a b c
expr $a*1000000 + $b*1000 + $c
} [sqlite3_libversion_number]
finish_test