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

Fix problems for 64-bit machines and when SQLITE_OMIT_AUTHORIZATION is defined. (CVS 1868)

FossilOrigin-Name: e3cad1ab6226089265b4d15c6fc67cc33a31425f
This commit is contained in:
drh
2004-07-26 12:24:22 +00:00
parent be5c89acd0
commit 1211de3709
9 changed files with 49 additions and 122 deletions

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.27 2004/07/19 17:25:25 drh Exp $
# $Id: tclsqlite.test,v 1.28 2004/07/26 12:24:24 drh Exp $
set testdir [file dirname $argv0]
source $testdir/tester.tcl
@ -74,10 +74,12 @@ do_test tcl-1.7 {
set v [catch {db} msg]
lappend v $msg
} {1 {wrong # args: should be "db SUBCOMMAND ..."}}
do_test tcl-1.8 {
set v [catch {db authorizer 1 2 3} msg]
lappend v $msg
} {1 {wrong # args: should be "db authorizer ?CALLBACK?"}}
if {[catch {db auth {}}]==0} {
do_test tcl-1.8 {
set v [catch {db authorizer 1 2 3} msg]
lappend v $msg
} {1 {wrong # args: should be "db authorizer ?CALLBACK?"}}
}
do_test tcl-1.9 {
set v [catch {db busy 1 2 3} msg]
lappend v $msg