Home | History | Annotate | Download | only in test
      1 # 2008 May 16
      2 #
      3 # The author disclaims copyright to this source code.  In place of
      4 # a legal notice, here is a blessing:
      5 #
      6 #    May you do good and not evil.
      7 #    May you find forgiveness for yourself and forgive others.
      8 #    May you share freely, never taking more than you give.
      9 #
     10 #***********************************************************************
     11 #
     12 # $Id: tkt3121.test,v 1.2 2008/07/12 14:52:21 drh Exp $
     13 
     14 set testdir [file dirname $argv0]
     15 source $testdir/tester.tcl
     16 
     17 ifcapable !vtab {
     18   finish_test
     19   return
     20 }
     21 
     22 # Register the module
     23 register_echo_module [sqlite3_connection_pointer db]
     24 
     25 do_test vtabD-1.1 {
     26   execsql {
     27     PRAGMA encoding = 'utf16';
     28 
     29     CREATE TABLE r1(field);
     30     CREATE TABLE r2(col PRIMARY KEY, descr);
     31 
     32     INSERT INTO r1 VALUES('abcd');
     33     INSERT INTO r2 VALUES('abcd', 'A nice description');
     34     INSERT INTO r2 VALUES('efgh', 'Another description');
     35 
     36     CREATE VIRTUAL TABLE t1 USING echo(r1);
     37     CREATE VIRTUAL TABLE t2 USING echo(r2);
     38   }
     39 } {}
     40 
     41 do_test vtabD-1.2 {
     42   execsql {
     43     select
     44       t1.field as Field,
     45       t2.descr as Descr
     46     from t1 inner join t2 on t1.field = t2.col order by t1.field
     47   }
     48 } {abcd {A nice description}}
     49 
     50 finish_test
     51