Import SQLite 3.7.6.3.

third_party/sqlite/src/test/memdb.test

 # 2001 September 15
 #
 # 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.
 #
 #***********************************************************************
@@ skipping 345 matching lines @@
   } {1 4}
 }
 
 do_test memdb-6.15 {
   execsql {
     DELETE FROM t5 WHERE x>0;
     SELECT * FROM t5;
   }
 } {}
 
-ifcapable subquery {
+ifcapable subquery&&vtab {
   do_test memdb-7.1 {
+    register_wholenumber_module db
     execsql {
       CREATE TABLE t6(x);
-      INSERT INTO t6 VALUES(1);
-      INSERT INTO t6 SELECT x+1 FROM t6;
-      INSERT INTO t6 SELECT x+2 FROM t6;
-      INSERT INTO t6 SELECT x+4 FROM t6;
-      INSERT INTO t6 SELECT x+8 FROM t6;
-      INSERT INTO t6 SELECT x+16 FROM t6;
-      INSERT INTO t6 SELECT x+32 FROM t6;
-      INSERT INTO t6 SELECT x+64 FROM t6;
-      INSERT INTO t6 SELECT x+128 FROM t6;
+      CREATE VIRTUAL TABLE nums USING wholenumber;
+      INSERT INTO t6 SELECT value FROM nums WHERE value BETWEEN 1 AND 256;
       SELECT count(*) FROM (SELECT DISTINCT x FROM t6);
     }
   } {256}
   for {set i 1} {$i<=256} {incr i} {
     do_test memdb-7.2.$i {
        execsql "DELETE FROM t6 WHERE x=\
                 (SELECT x FROM t6 ORDER BY random() LIMIT 1)"
        execsql {SELECT count(*) FROM t6}
     } [expr {256-$i}]
   }
@@ skipping 40 matching lines @@
     set pgovfl [lindex [sqlite3_status SQLITE_STATUS_PAGECACHE_OVERFLOW 0] 1]
     execsql { DELETE FROM t1 }
     set memused2 [lindex [sqlite3_status SQLITE_STATUS_MEMORY_USED 0] 1]
     expr {($memused2 + 2048 < $memused) || $pgovfl==0}
   } {1}
 }
 
 } ;# ifcapable memorydb
 
 finish_test