/ Check-in [44049239]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Fix a problem with the test scripts caused by not cleaning up the global tcl namespace. (CVS 5044)
Downloads: Tarball | ZIP archive | SQL archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 440492395854a0886ef954ef2ed638bf587c6f03
User & Date: danielk1977 2008-04-24 12:38:29
Context
2008-04-24
19:15
Consolidated varint macro usage from btreeInt.h, vdbe.c, and vdbeaux.c into sqliteInt.h and made their use consistent. Slight improvements to varint32 macros. (CVS 5045) check-in: 0d04ccd9 user: shane tags: trunk
12:38
Fix a problem with the test scripts caused by not cleaning up the global tcl namespace. (CVS 5044) check-in: 44049239 user: danielk1977 tags: trunk
12:37
Fix an assert() failure that can occur if "journal_mode=off" is used in a build with the atomic-write optimization enabled. (CVS 5043) check-in: 709d17b1 user: danielk1977 tags: trunk
Changes
Hide Diffs Side-by-Side Diffs Ignore Whitespace Patch

Changes to test/select2.test.

     7      7   #    May you find forgiveness for yourself and forgive others.
     8      8   #    May you share freely, never taking more than you give.
     9      9   #
    10     10   #***********************************************************************
    11     11   # This file implements regression tests for SQLite library.  The
    12     12   # focus of this file is testing the SELECT statement.
    13     13   #
    14         -# $Id: select2.test,v 1.25 2005/07/21 03:15:01 drh Exp $
           14  +# $Id: select2.test,v 1.26 2008/04/24 12:38:29 danielk1977 Exp $
    15     15   
    16     16   set testdir [file dirname $argv0]
    17     17   source $testdir/tester.tcl
    18     18   
    19     19   # Create a table with some data
    20     20   #
    21     21   execsql {CREATE TABLE tbl1(f1 int, f2 int)}
................................................................................
    51     51       set sql2 "SELECT f2 FROM tbl1 WHERE f1=$f1 ORDER BY f2"
    52     52       db eval $sql2 d2 {
    53     53         lappend r $d2(f2)
    54     54       }
    55     55     }
    56     56     set r
    57     57   } {4: 2 3 4}
           58  +unset data
    58     59   
    59     60   # Create a largish table. Do this twice, once using the TCL cache and once
    60     61   # without.  Compare the performance to make sure things go faster with the
    61     62   # cache turned on.
    62     63   #
    63     64   ifcapable tclvar {
    64     65     do_test select2-2.0.1 {