[sql] Import SQLite 3.17.0.

third_party/sqlite/src/test/exclusive2.test

 # 2007 March 24
 #
 # 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 103 matching lines @@
 #
 # For similar reasons, this test does not work with the memsubsys1 permutation.
 # Permutation memsubsys1 configures the pcache subsystem to use a static
 # allocation of 24 pages (shared between all pagers). This is not enough for
 # this test.
 #
 do_test exclusive2-1.1 {
   execsql {
     BEGIN;
     CREATE TABLE t1(a, b);
-    INSERT INTO t1(a) VALUES(randstr(10, 400));
-    INSERT INTO t1(a) VALUES(randstr(10, 400));
-    INSERT INTO t1(a) SELECT randstr(10, 400) FROM t1;
-    INSERT INTO t1(a) SELECT randstr(10, 400) FROM t1;
-    INSERT INTO t1(a) SELECT randstr(10, 400) FROM t1;
-    INSERT INTO t1(a) SELECT randstr(10, 400) FROM t1;
-    INSERT INTO t1(a) SELECT randstr(10, 400) FROM t1;
+    INSERT INTO t1(a, b) VALUES(randstr(10, 400), 0);
+    INSERT INTO t1(a, b) VALUES(randstr(10, 400), 0);
+    INSERT INTO t1(a, b) SELECT randstr(10, 400), 0 FROM t1;
+    INSERT INTO t1(a, b) SELECT randstr(10, 400), 0 FROM t1;
+    INSERT INTO t1(a, b) SELECT randstr(10, 400), 0 FROM t1;
+    INSERT INTO t1(a, b) SELECT randstr(10, 400), 0 FROM t1;
+    INSERT INTO t1(a, b) SELECT randstr(10, 400), 0 FROM t1;
     COMMIT;
     SELECT count(*) FROM t1;
   }
 } {64}
 do_test exclusive2-1.2.1 {
   # Make sure the pager cache is large enough to store the 
   # entire database.
   set nPage [expr [file size test.db]/1024]
   if {$::SQLITE_DEFAULT_CACHE_SIZE < $nPage} {
     execsql "PRAGMA cache_size = $nPage"
   }
   expr {[execsql {PRAGMA cache_size}] >= $nPage}
 } {1}
 do_test exclusive2-1.2 {
   set ::sig [t1sig]
   readPagerChangeCounter test.db
 } {1}
 do_test exclusive2-1.3 {
   t1sig
 } $::sig
 do_test exclusive2-1.4 {
   sqlite3 db2 test.db
   t1sig db2
 } $::sig
 do_test exclusive2-1.5 {
   execsql {
-    UPDATE t1 SET b=a, a=NULL;
+    UPDATE t1 SET b=a, a=0;
   } db2
   expr {[t1sig db2] eq $::sig}
 } 0
 do_test exclusive2-1.6 {
   readPagerChangeCounter test.db
 } {2}
 do_test exclusive2-1.7 {
   pagerChangeCounter test.db 1
 } {1}
 if {[permutation] != "memsubsys1"} {
@@ skipping 147 matching lines @@
 } {4}
 do_test exclusive2-3.6 {
   execsql {
     INSERT INTO t1 VALUES(randstr(200, 200));
   }
   readPagerChangeCounter test.db
 } {5}
 sqlite3_soft_heap_limit $cmdlinearg(soft-heap-limit)
 
 finish_test