diff options
Diffstat (limited to 'tool/shell4.test')
| -rw-r--r-- | tool/shell4.test | 13 |
1 files changed, 1 insertions, 12 deletions
diff --git a/tool/shell4.test b/tool/shell4.test index b4bef3afa..085c279bb 100644 --- a/tool/shell4.test +++ b/tool/shell4.test @@ -10,6 +10,7 @@ #*********************************************************************** # # The focus of this file is testing the CLI shell tool. +# These tests are specific to the .stats command. # # $Id: shell4.test,v 1.7 2009/07/17 16:54:48 shaneh Exp $ # @@ -19,8 +20,6 @@ # shell4-1.*: Basic tests specific to the "stats" command. # -package require sqlite3 - set CLI "./sqlite3" proc do_test {name cmd expected} { @@ -36,15 +35,6 @@ proc do_test {name cmd expected} { } } -proc execsql {sql} { - uplevel [list db eval $sql] -} - -proc catchsql {sql} { - set rc [catch {uplevel [list db eval $sql]} msg] - list $rc $msg -} - proc catchcmd {db {cmd ""}} { global CLI set out [open cmds.txt w] @@ -56,7 +46,6 @@ proc catchcmd {db {cmd ""}} { } file delete -force test.db test.db.journal -sqlite3 db test.db #---------------------------------------------------------------------------- # Test cases shell4-1.*: Tests specific to the "stats" command. |