Import SQLite 3.7.6.3.

third_party/sqlite/src/test/select9.test

 # 2008 June 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.
 #
 #***********************************************************************
 # This file implements regression tests for SQLite library. 
 #
 # $Id: select9.test,v 1.4 2008/07/01 14:39:35 danielk1977 Exp $
 
 # The tests in this file are focused on test compound SELECT statements 
 # that have any or all of an ORDER BY, LIMIT or OFFSET clauses. As of
 # version 3.6.0, SQLite contains code to use SQL indexes where possible 
 # to optimize such statements.
 #
 
 # TODO Points:
 #
 #   * Are there any "column affinity" issues to consider?
 
 set testdir [file dirname $argv0]
 source $testdir/tester.tcl
 
-#set ISQUICK 1
-
 #-------------------------------------------------------------------------
 # test_compound_select TESTNAME SELECT RESULT
 #
 #   This command is used to run multiple LIMIT/OFFSET test cases based on 
 #   the single SELECT statement passed as the second argument. The SELECT
 #   statement may not contain a LIMIT or OFFSET clause. This proc tests
 #   many statements of the form:
 #    
 #     "$SELECT limit $X offset $Y"
 #    
@@ skipping 15 matching lines @@
   set nRow [expr {[llength $result] / $nCol}]
 
   set ::compound_sql $sql
   do_test $testname { 
     execsql $::compound_sql
   } $result
 #return
 
   set iLimitIncr  1
   set iOffsetIncr 1
-  if {[info exists ::ISQUICK] && $::ISQUICK && $nRow>=5} {
+  if {[info exists ::G(isquick)] && $::G(isquick) && $nRow>=5} {
     set iOffsetIncr [expr $nRow / 5]
     set iLimitIncr [expr $nRow / 5]
   }
 
   set iLimitEnd   [expr $nRow+$iLimitIncr]
   set iOffsetEnd  [expr $nRow+$iOffsetIncr]
 
   for {set iOffset 0} {$iOffset < $iOffsetEnd} {incr iOffset $iOffsetIncr} {
     for {set iLimit 0} {$iLimit < $iLimitEnd} {incr iLimit} {
   
@@ skipping 336 matching lines @@
 do_test select9-4.X {
   execsql {
     DROP INDEX i1;
     DROP INDEX i2;
     DROP VIEW v1;
   }
 } {}
 
 
 finish_test