diff options
| author | drh <drh@noemail.net> | 2008-01-23 12:52:40 +0000 |
|---|---|---|
| committer | drh <drh@noemail.net> | 2008-01-23 12:52:40 +0000 |
| commit | 01495b992158f6da5568bcc11e82d6844ffff4a8 (patch) | |
| tree | 4317198de87b54f358a6515089518e65c364a860 /src/test_config.c | |
| parent | 7e8b848a60a305231cca0b8cfc7f08be5f0429bd (diff) | |
| download | sqlite-01495b992158f6da5568bcc11e82d6844ffff4a8.tar.gz sqlite-01495b992158f6da5568bcc11e82d6844ffff4a8.zip | |
Improvements to test coverage in the lemon-generated parser and in the
sqlite3_get_table() interface. (CVS 4745)
FossilOrigin-Name: 9f95d79daeb5e7f6fd62f3c896dae4d332121d1c
Diffstat (limited to 'src/test_config.c')
| -rw-r--r-- | src/test_config.c | 9 |
1 files changed, 6 insertions, 3 deletions
diff --git a/src/test_config.c b/src/test_config.c index dcbd8ed95..b47ca899e 100644 --- a/src/test_config.c +++ b/src/test_config.c @@ -16,7 +16,7 @@ ** The focus of this file is providing the TCL testing layer ** access to compile-time constants. ** -** $Id: test_config.c,v 1.18 2008/01/22 23:37:10 drh Exp $ +** $Id: test_config.c,v 1.19 2008/01/23 12:52:41 drh Exp $ */ #include "sqliteLimit.h" @@ -44,6 +44,8 @@ int sqlite3MAX_LIKE_PATTERN_LENGTH = SQLITE_MAX_LIKE_PATTERN_LENGTH; ** procedures use this to determine when tests should be omitted. */ static void set_options(Tcl_Interp *interp){ + int rc = 0; + #ifdef SQLITE_32BIT_ROWID Tcl_SetVar2(interp, "sqlite_options", "rowid32", "1", TCL_GLOBAL_ONLY); #else @@ -366,12 +368,13 @@ Tcl_SetVar2(interp, "sqlite_options", "long_double", Tcl_SetVar2(interp, "sqlite_options", "tclvar", "1", TCL_GLOBAL_ONLY); #endif + rc = sqlite3_threadsafe(); #if SQLITE_THREADSAFE Tcl_SetVar2(interp, "sqlite_options", "threadsafe", "1", TCL_GLOBAL_ONLY); - assert( sqlite3_threadsafe() ); + assert( rc ); #else Tcl_SetVar2(interp, "sqlite_options", "threadsafe", "0", TCL_GLOBAL_ONLY); - assert( !sqlite3_threadsafe() ); + assert( !rc ); #endif #ifdef SQLITE_OMIT_TRACE |