Many hyperlinks are disabled.
Use anonymous login
to enable hyperlinks.
Overview
| Comment: | Ensure that the Tcl "db onecolumn" command returns an empty string if the SELECT statement returns zero rows. |
|---|---|
| Downloads: | Tarball | ZIP archive |
| Timelines: | family | ancestors | descendants | both | trunk |
| Files: | files | file ages | folders |
| SHA1: |
928bcaf0f00a408e2f6c1d85dfab2144 |
| User & Date: | dan 2011-08-18 17:47:57.861 |
Context
|
2011-08-19
| ||
| 14:54 | When retrying a write() after an EINTR error on unix, be sure to also rerun the previous lseek(). Ticket [e59bdf6116036a] (check-in: 21452f3ae6 user: drh tags: trunk) | |
|
2011-08-18
| ||
| 17:47 | Ensure that the Tcl "db onecolumn" command returns an empty string if the SELECT statement returns zero rows. (check-in: 928bcaf0f0 user: dan tags: trunk) | |
|
2011-08-17
| ||
| 07:46 | Properly process x64 DLL exports, which do not contain a leading underscore, in the MSVC makefile. (check-in: d5936324d2 user: mistachkin tags: trunk) | |
Changes
Changes to src/tclsqlite.c.
| ︙ | ︙ | |||
2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 |
}
dbEvalInit(&sEval, pDb, objv[2], 0);
rc = dbEvalStep(&sEval);
if( choice==DB_ONECOLUMN ){
if( rc==TCL_OK ){
Tcl_SetObjResult(interp, dbEvalColumnValue(&sEval, 0));
}
}else if( rc==TCL_BREAK || rc==TCL_OK ){
Tcl_SetObjResult(interp, Tcl_NewBooleanObj(rc==TCL_OK));
}
dbEvalFinalize(&sEval);
if( rc==TCL_BREAK ){
| > > | 2238 2239 2240 2241 2242 2243 2244 2245 2246 2247 2248 2249 2250 2251 2252 2253 |
}
dbEvalInit(&sEval, pDb, objv[2], 0);
rc = dbEvalStep(&sEval);
if( choice==DB_ONECOLUMN ){
if( rc==TCL_OK ){
Tcl_SetObjResult(interp, dbEvalColumnValue(&sEval, 0));
}else if( rc==TCL_BREAK ){
Tcl_ResetResult(interp);
}
}else if( rc==TCL_BREAK || rc==TCL_OK ){
Tcl_SetObjResult(interp, Tcl_NewBooleanObj(rc==TCL_OK));
}
dbEvalFinalize(&sEval);
if( rc==TCL_BREAK ){
|
| ︙ | ︙ |
Changes to test/tclsqlite.test.
| ︙ | ︙ | |||
612 613 614 615 616 617 618 619 620 621 |
db eval {
DELETE FROM t5;
INSERT INTO t5 VALUES(@y);
SELECT hex(x), typeof(x) FROM t5
}
} {31323334 blob}
}
finish_test
| > > > > > > > > > > > | 612 613 614 615 616 617 618 619 620 621 622 623 624 625 626 627 628 629 630 631 632 |
db eval {
DELETE FROM t5;
INSERT INTO t5 VALUES(@y);
SELECT hex(x), typeof(x) FROM t5
}
} {31323334 blob}
}
db func xCall xCall
proc xCall {} { return "value" }
do_execsql_test tcl-14.1 {
CREATE TABLE t6(x);
INSERT INTO t6 VALUES(1);
}
do_test tcl-14.2 {
db one {SELECT x FROM t6 WHERE xCall()!='value'}
} {}
finish_test
|