Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
Comment: | Modify tclsqlite.test so that it works reliably with tcl 8.5.4. (CVS 5640) |
---|---|
Downloads: | Tarball | ZIP archive |
Timelines: | family | ancestors | descendants | both | trunk |
Files: | files | file ages | folders |
SHA1: |
790d329f5d18d361a5d6d34f46c269f8 |
User & Date: | danielk1977 2008-08-29 15:54:57.000 |
Context
2008-08-29
| ||
17:56 | Move a call to sqlite3_mutex_leave() to protect calls to sqlite3StatusAdd() related to scratch (SQLITE_CONFIG_SCRATCH) memory. (CVS 5641) (check-in: 4e011ddf9e user: danielk1977 tags: trunk) | |
15:54 | Modify tclsqlite.test so that it works reliably with tcl 8.5.4. (CVS 5640) (check-in: 790d329f5d user: danielk1977 tags: trunk) | |
12:00 | In permutations.test, disable tests that depend on soft-heap-limit functionality when running the memsubsys2 variant. It disables the soft-heap-limit. (CVS 5639) (check-in: 047c7bdb9f user: danielk1977 tags: trunk) | |
Changes
Changes to test/tclsqlite.test.
︙ | ︙ | |||
11 12 13 14 15 16 17 | # This file implements regression tests for TCL interface to the # SQLite library. # # Actually, all tests are based on the TCL interface, so the main # interface is pretty well tested. This file contains some addition # tests for fringe issues that the main test suite does not cover. # | | | 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 | # This file implements regression tests for TCL interface to the # SQLite library. # # Actually, all tests are based on the TCL interface, so the main # interface is pretty well tested. This file contains some addition # tests for fringe issues that the main test suite does not cover. # # $Id: tclsqlite.test,v 1.67 2008/08/29 15:54:57 danielk1977 Exp $ set testdir [file dirname $argv0] source $testdir/tester.tcl # Check the error messages generated by tclsqlite # if {[sqlite3 -has-codec]} { |
︙ | ︙ | |||
230 231 232 233 234 235 236 | ifcapable {tclvar} { # Parsing of TCL variable names within SQL into bound parameters. # do_test tcl-5.1 { execsql {CREATE TABLE t3(a,b,c)} catch {unset x} | | | | | 230 231 232 233 234 235 236 237 238 239 240 241 242 243 244 245 246 247 248 249 250 | ifcapable {tclvar} { # Parsing of TCL variable names within SQL into bound parameters. # do_test tcl-5.1 { execsql {CREATE TABLE t3(a,b,c)} catch {unset x} set x(1) A set x(2) B execsql { INSERT INTO t3 VALUES($::x(1),$::x(2),$::x(3)); SELECT * FROM t3 } } {A B {}} do_test tcl-5.2 { execsql { SELECT typeof(a), typeof(b), typeof(c) FROM t3 } } {text text null} do_test tcl-5.3 { catch {unset x} |
︙ | ︙ |