Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Tolerate evolving error messages from sqlite3. |
|---|---|
| Downloads: | Tarball | ZIP archive | SQL archive |
| Timelines: | family | ancestors | descendants | both | trunk | tdbcsqlite3-1-0-1 |
| Files: | files | file ages | folders |
| SHA1: |
f15492143a78b63516d587334b7990b4 |
| User & Date: | dgp 2014-08-18 20:15:28 |
Context
|
2014-10-23
| ||
| 19:30 | [TDBC Bug 00b792] OpenBSD friendly docs. check-in: 74526bd0fa user: dgp tags: trunk | |
|
2014-08-18
| ||
| 20:15 | Tolerate evolving error messages from sqlite3. check-in: f15492143a user: dgp tags: trunk, tdbcsqlite3-1-0-1 | |
|
2014-08-14
| ||
| 18:08 | bump to 1.0.1 check-in: 743600d86f user: dgp tags: trunk | |
Changes
Changes to tests/tdbcsqlite3.test.
405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 431 |
}]
$stmt paramtype idnum integer
$stmt paramtype name varchar 40
set rs [$stmt execute {idnum 1 name fred}]
rename $rs {}
}
-body {
set status [catch {$stmt execute {idnum 1 name barney}} result]
list $status $result
}
-cleanup {
rename $stmt {}
set stmt [::db prepare {
DELETE FROM people
}]
set rs [$stmt execute]
rename $rs {}
rename $stmt {}
}
-result {1 {PRIMARY KEY must be unique}}
}
if 0 {
# following tests check error syntax for 'paramtype' - and tdbcsqlite3
# ignores paramtype, so they're kind of meaningless
|
| < | |
405 406 407 408 409 410 411 412 413 414 415 416 417 418 419 420 421 422 423 424 425 426 427 428 429 430 |
}]
$stmt paramtype idnum integer
$stmt paramtype name varchar 40
set rs [$stmt execute {idnum 1 name fred}]
rename $rs {}
}
-body {
catch {$stmt execute {idnum 1 name barney}}
}
-cleanup {
rename $stmt {}
set stmt [::db prepare {
DELETE FROM people
}]
set rs [$stmt execute]
rename $rs {}
rename $stmt {}
}
-result 1
}
if 0 {
# following tests check error syntax for 'paramtype' - and tdbcsqlite3
# ignores paramtype, so they're kind of meaningless
|