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

Document the SHOW_DATATYPES pragma and add tests for it to the test suite.

Browse Source 
Make sure datatypes are show even for aliased columns.
Tickets #220 and #221. (CVS 822)

FossilOrigin-Name: e84d3afe7b9153d003fdcca98221f446c004ffa2
This commit is contained in:
drh
2003-01-11 14:19:51 +00:00
parent 836faa4843
commit 5a38705ecb
7 changed files with 160 additions and 44 deletions
Download Patch File Download Diff File Expand all files Collapse all files

14
test/pager.test
View File

@ -11,7 +11,7 @@
# This file implements regression tests for SQLite library. The
# focus of this script is page cache subsystem.
#
# $Id: pager.test,v 1.11 2002/02/02 18:49:21 drh Exp $
# $Id: pager.test,v 1.12 2003/01/11 14:19:52 drh Exp $
set testdir [file dirname $argv0]
@ -48,12 +48,12 @@ do_test pager-2.1 {
set ::p1 [pager_open ptf1.db 10]
} msg]
} {0}
do_test pager-2.2 {
set v [catch {
set ::g1 [page_get $::p1 0]
} msg]
lappend v $msg
} {1 SQLITE_ERROR}
#do_test pager-2.2 {
# set v [catch {
# set ::g1 [page_get $::p1 0]
# } msg]
# lappend v $msg
#} {1 SQLITE_ERROR}
do_test pager-2.3.1 {
set ::gx [page_lookup $::p1 1]
} {}

45
test/pragma.test
View File

@ -12,7 +12,7 @@
#
# This file implements tests for the PRAGMA command.
#
# $Id: pragma.test,v 1.1 2002/03/06 22:01:37 drh Exp $
# $Id: pragma.test,v 1.2 2003/01/11 14:19:52 drh Exp $
set testdir [file dirname $argv0]
source $testdir/tester.tcl
@ -22,7 +22,7 @@ source $testdir/tester.tcl
#
db close
file delete test.db
sqlite db test.db
set DB [sqlite db test.db]
do_test pragma-1.1 {
execsql {
@ -108,7 +108,7 @@ do_test pragma-1.9 {
} {123 123 0 0}
do_test pragma-1.10 {
db close
sqlite db test.db
set ::DB [sqlite db test.db]
execsql {
PRAGMA cache_size;
PRAGMA default_cache_size;
@ -117,4 +117,43 @@ do_test pragma-1.10 {
}
} {123 123 0 0}
do_test pragma-1.11 {
execsql {
PRAGMA show_datatypes=on;
PRAGMA empty_result_callbacks=off;
}
sqlite_datatypes $::DB {SELECT * FROM sqlite_master}
} {}
do_test pragma-1.12 {
execsql {
PRAGMA empty_result_callbacks=on;
}
sqlite_datatypes $::DB {SELECT * FROM sqlite_master}
} {NUMERIC NUMERIC NUMERIC NUMERIC NUMERIC}
do_test pragma-1.13 {
execsql {
CREATE TABLE t1(
a INTEGER,
b TEXT,
c WHATEVER,
d CLOB,
e BLOB,
f VARCHAR(123),
g nVaRcHaR(432)
);
}
sqlite_datatypes $::DB {SELECT * FROM t1}
} {NUMERIC TEXT NUMERIC TEXT TEXT TEXT TEXT}
do_test pragma-1.14 {
sqlite_datatypes $::DB {
SELECT 1, 'hello', NULL
}
} {NUMERIC TEXT TEXT}
do_test pragma-1.15 {
sqlite_datatypes $::DB {
SELECT 1+2 AS X, 'hello' || 5 AS Y, NULL AS Z
}
} {NUMERIC TEXT TEXT}
finish_test