diff options
| author | danielk1977 <danielk1977@noemail.net> | 2004-06-30 11:54:06 +0000 |
|---|---|---|
| committer | danielk1977 <danielk1977@noemail.net> | 2004-06-30 11:54:06 +0000 |
| commit | 13073931a356b9214371f4ce79dcf8c551e6ece0 (patch) | |
| tree | a89b17d78e4826da9e5363f0a349b3931c035a3e /src/tclsqlite.c | |
| parent | 376deb182adb01f692753a58f4b7e350a29bb099 (diff) | |
| download | sqlite-13073931a356b9214371f4ce79dcf8c551e6ece0.tar.gz sqlite-13073931a356b9214371f4ce79dcf8c551e6ece0.zip | |
Coverage improvements for malloc and vdbemem.c (CVS 1781)
FossilOrigin-Name: a98dd004c4d328eb44a71fecdbf8c5ab416dc524
Diffstat (limited to 'src/tclsqlite.c')
| -rw-r--r-- | src/tclsqlite.c | 5 |
1 files changed, 4 insertions, 1 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index a1c0bb3cb..652f65f09 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -11,7 +11,7 @@ ************************************************************************* ** A TCL Interface to SQLite ** -** $Id: tclsqlite.c,v 1.93 2004/06/29 13:41:21 danielk1977 Exp $ +** $Id: tclsqlite.c,v 1.94 2004/06/30 11:54:07 danielk1977 Exp $ */ #ifndef NO_TCL /* Omit this whole file if TCL is unavailable */ @@ -1081,7 +1081,10 @@ static int DbMain(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){ #ifdef SQLITE_TEST { extern void Md5_Register(sqlite*); + int mallocfail = sqlite3_iMallocFail; + sqlite3_iMallocFail = 0; Md5_Register(p->db); + sqlite3_iMallocFail = mallocfail; } #endif p->interp = interp; |