summaryrefslogtreecommitdiff
path: root/components/external/SQLite-3.8.1/test/vtab2.test
diff options
context:
space:
mode:
authorbernard <[email protected]>2017-11-02 13:50:42 +0800
committerbernard <[email protected]>2017-11-02 13:50:42 +0800
commitb2057f506a09e2adef81fc77efd697d16ae14bec (patch)
tree3affefabfe376a0ec1b3ac4a5eef957c1dd58dc8 /components/external/SQLite-3.8.1/test/vtab2.test
parent23582c8129228b4961ad35319cfd2d270039345f (diff)
[External] Remove external from RT-Thread
Diffstat (limited to 'components/external/SQLite-3.8.1/test/vtab2.test')
-rw-r--r--components/external/SQLite-3.8.1/test/vtab2.test136
1 files changed, 0 insertions, 136 deletions
diff --git a/components/external/SQLite-3.8.1/test/vtab2.test b/components/external/SQLite-3.8.1/test/vtab2.test
deleted file mode 100644
index 05a4834a1b..0000000000
--- a/components/external/SQLite-3.8.1/test/vtab2.test
+++ /dev/null
@@ -1,136 +0,0 @@
-# 2006 June 10
-#
-# The author disclaims copyright to this source code. In place of
-# a legal notice, here is a blessing:
-#
-# May you do good and not evil.
-# May you find forgiveness for yourself and forgive others.
-# May you share freely, never taking more than you give.
-#
-#***********************************************************************
-# This file implements regression tests for SQLite library.
-#
-# $Id: vtab2.test,v 1.9 2008/10/13 10:37:50 danielk1977 Exp $
-
-set testdir [file dirname $argv0]
-source $testdir/tester.tcl
-
-ifcapable !vtab||!schema_pragmas {
- finish_test
- return
-}
-
-register_schema_module [sqlite3_connection_pointer db]
-do_test vtab2-1.1 {
- execsql {
- CREATE VIRTUAL TABLE schema USING schema;
- SELECT * FROM schema;
- }
-} [list \
- main schema 0 database {} 0 {} 0 \
- main schema 1 tablename {} 0 {} 0 \
- main schema 2 cid {} 0 {} 0 \
- main schema 3 name {} 0 {} 0 \
- main schema 4 type {} 0 {} 0 \
- main schema 5 not_null {} 0 {} 0 \
- main schema 6 dflt_value {} 0 {} 0 \
- main schema 7 pk {} 0 {} 0 \
-]
-
-# See ticket #2230.
-#
-do_test vtab2-1.2 {
- execsql {
- SELECT length(tablename) FROM schema GROUP by tablename;
- }
-} {6}
-do_test vtab2-1.3 {
- execsql {
- SELECT tablename FROM schema GROUP by length(tablename);
- }
-} {schema}
-do_test vtab2-1.4 {
- execsql {
- SELECT length(tablename) FROM schema GROUP by length(tablename);
- }
-} {6}
-
-register_tclvar_module [sqlite3_connection_pointer db]
-do_test vtab2-2.1 {
- set ::abc 123
- execsql {
- CREATE VIRTUAL TABLE vars USING tclvar;
- SELECT * FROM vars WHERE name='abc';
- }
-} [list abc "" 123]
-do_test vtab2-2.2 {
- set A(1) 1
- set A(2) 4
- set A(3) 9
- execsql {
- SELECT * FROM vars WHERE name='A';
- }
-} [list A 1 1 A 2 4 A 3 9]
-unset -nocomplain result
-unset -nocomplain var
-set result {}
-foreach var [lsort [info vars tcl_*]] {
- catch {lappend result $var [set $var]}
-}
-do_test vtab2-2.3 {
- execsql {
- SELECT name, value FROM vars
- WHERE name MATCH 'tcl_*' AND arrayname = ''
- ORDER BY name;
- }
-} $result
-unset result
-unset var
-
-# Ticket #2894.
-#
-# Make sure we do call Column(), and Rowid() methods of
-# a virtual table when that table is in a LEFT JOIN.
-#
-do_test vtab2-3.1 {
- execsql {
- SELECT * FROM schema WHERE dflt_value IS NULL LIMIT 1
- }
-} {main schema 0 database {} 0 {} 0}
-do_test vtab2-3.2 {
- execsql {
- SELECT *, b.rowid
- FROM schema a LEFT JOIN schema b ON a.dflt_value=b.dflt_value
- WHERE a.rowid=1
- }
-} {main schema 0 database {} 0 {} 0 {} {} {} {} {} {} {} {} {}}
-
-do_test vtab2-4.1 {
- execsql {
- BEGIN TRANSACTION;
- CREATE TABLE t1(a INTEGER PRIMARY KEY, b, c, UNIQUE(b, c));
- CREATE TABLE fkey(
- to_tbl,
- to_col
- );
- INSERT INTO "fkey" VALUES('t1',NULL);
- COMMIT;
- }
-} {}
-do_test vtab2-4.2 {
- execsql { CREATE VIRTUAL TABLE v_col USING schema }
-} {}
-do_test vtab2-4.3 {
- execsql { SELECT name FROM v_col WHERE tablename = 't1' AND pk }
-} {a}
-do_test vtab2-4.4 {
- execsql {
- UPDATE fkey
- SET to_col = (SELECT name FROM v_col WHERE tablename = 't1' AND pk);
- }
-} {}
-do_test vtab2-4.5 {
- execsql { SELECT * FROM fkey }
-} {t1 a}
-
-finish_test