test/tkt-91e2e8ba6f.test

   1 # 2011 June 23
   2 #
   3 #    May you do good and not evil.
   4 #    May you find forgiveness for yourself and forgive others.
   5 #    May you share freely, never taking more than you give.
   6 #
   7 #***********************************************************************
   8 #
   9 # This file contains tests for SQLite. Specifically, it tests that SQLite
  10 # does not crash and an error is returned if localhost() fails. This
  11 # is the problem reported by ticket 91e2e8ba6f.
  12 #
  13
  14 set testdir [file dirname $argv0]
  15 source $testdir/tester.tcl
  16
  17 set testprefix tkt-91e2e8ba6f
  18
  19
  20 do_execsql_test 1.1 {
  21   CREATE TABLE t1(x INTEGER, y REAL);
  22   INSERT INTO t1 VALUES(11, 11);
  23 } {}
  24
  25 do_execsql_test 1.2 {
  26   SELECT x/10, y/10 FROM t1;
  27 } {1 1.1}
  28
  29 do_execsql_test 1.3 {
  30   SELECT x/10, y/10 FROM (SELECT * FROM t1);
  31 } {1 1.1}
  32
  33 do_execsql_test 1.4 {
  34   SELECT x/10, y/10 FROM (SELECT * FROM t1 LIMIT 5 OFFSET 0);
  35 } {1 1.1}
  36
  37 do_execsql_test 1.5 {
  38   SELECT x/10, y/10 FROM (SELECT * FROM t1 LIMIT 5 OFFSET 0) LIMIT 5 OFFSET 0;
  39 } {1 1.1}
  40
  41 do_execsql_test 1.6 {
  42   SELECT a.x/10, a.y/10 FROM
  43     (SELECT * FROM t1 LIMIT 5 OFFSET 0) AS a, t1 AS b WHERE a.x = b.x
  44   LIMIT 5 OFFSET 0;
  45 } {1 1.1}
  46
  47 do_execsql_test 1.7 {
  48   CREATE VIEW v1 AS SELECT * FROM t1 LIMIT 5;
  49   SELECT a.x/10, a.y/10 FROM v1 AS a, t1 AS b WHERE a.x = b.x LIMIT 5 OFFSET 0;
  50 } {1 1.1}
  51
  52 finish_test