Need SQLITE_MEMDEBUG instead of SQLITE_DEBUG in tclsqlite.c. (CVS 2209)

FossilOrigin-Name: 6e905270a933fd4c99f6db6707ed79166f6484ee

diff --git a/manifest b/manifest
index e89d69046f97b04f6bb187402b1fb56179bdce2f..99633a6253f98659363f6f4c4d82d5412b5dd3bd 100644 (file)
--- a/manifest
+++ b/manifest
@@ -1,5 +1,5 @@
-C Fix\sa\sbug\sin\slemon\sthat\sdoes\snot\seffect\sSQLite.\s\sTicket\s#1068.\s(CVS\s2208)
-D 2005-01-13T23:54:07
+C Need\sSQLITE_MEMDEBUG\sinstead\sof\sSQLITE_DEBUG\sin\stclsqlite.c.\s(CVS\s2209)
+D 2005-01-13T23:54:32
 F Makefile.in 6ce51dde6a8fe82fc12f20dec750572f6a19f56a
 F Makefile.linux-gcc a9e5a0d309fa7c38e7c14d3ecf7690879d3a5457
 F README a01693e454a00cc117967e3f9fdab2d4d52e9bc1
@@ -64,7 +64,7 @@ F src/shell.c 591364a0e9ca4ce53873e21e0294476c0c2b4770
 F src/sqlite.h.in 0d5e48e506845b74a845c9470e01d3f472b59611
 F src/sqliteInt.h 641b348a109a080262d9f3603f2e94143d4383f2
 F src/table.c 25b3ff2b39b7d87e8d4a5da0713d68dfc06cbee9
-F src/tclsqlite.c 8419f424ebcc6ae0d391f21a991638cb20c2ffc6
+F src/tclsqlite.c fd27457b228118be96524dae285146c76efe032b
 F src/test1.c 2e27b110ba5aa16977bad1cc2388553479d73793
 F src/test2.c bbc2ecc58ceeab12d1e40970f831b1017524e40d
 F src/test3.c a72f20066cccd5a7b9f20b7b78fa9b05b47b3020
@@ -268,7 +268,7 @@ F www/tclsqlite.tcl e73f8f8e5f20e8277619433f7970060ab01088fc
 F www/vdbe.tcl 095f106d93875c94b47367384ebc870517431618
 F www/version3.tcl 092a01f5ef430d2c4acc0ae558d74c4bb89638a0
 F www/whentouse.tcl c3b50d3ac31c54be2a1af9b488a89d22f1e6e746
-P 94cf91cc5dc0d656636211d23350a1ec29aced8a
-R 22751790adbb0fabba4752e324de35f9
+P 7113b5ed8d51718356ce1cc51896a3070875a7e2
+R 97b9862e7f5be337d69e7b8a5cce7fca
 U drh
-Z df8ba3dea9dafef9b539e800490a2365
+Z 48311deeb016a5dd529c213b5f492974

diff --git a/manifest.uuid b/manifest.uuid
index d0d735ad7bb3a3248e1d9736de79a350b47d0dd6..d4ca7f8e2b5b154e1e10292d7efd175960a633a3 100644 (file)
--- a/manifest.uuid
+++ b/manifest.uuid
@@ -1 +1 @@
-7113b5ed8d51718356ce1cc51896a3070875a7e2
\ No newline at end of file
+6e905270a933fd4c99f6db6707ed79166f6484ee
\ No newline at end of file

diff --git a/src/tclsqlite.c b/src/tclsqlite.c
index 00dee1837f22843bba623453ab23f94938128df8..bd277f98ba1f50c757a18c1f06ba846a88422917 100644 (file)
--- a/src/tclsqlite.c
+++ b/src/tclsqlite.c
@@ -11,7 +11,7 @@
 *************************************************************************
 ** A TCL Interface to SQLite
 **
-** $Id: tclsqlite.c,v 1.114 2005/01/12 12:44:04 danielk1977 Exp $
+** $Id: tclsqlite.c,v 1.115 2005/01/13 23:54:32 drh Exp $
 */
 #ifndef NO_TCL     /* Omit this whole file if TCL is unavailable */
 
@@ -1412,12 +1412,12 @@ static int DbMain(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){
 #ifdef SQLITE_TEST
   {
     extern void Md5_Register(sqlite3*);
-#ifdef SQLITE_DEBUG
+#ifdef SQLITE_MEMDEBUG
     int mallocfail = sqlite3_iMallocFail;
     sqlite3_iMallocFail = 0;
 #endif
     Md5_Register(p->db);
-#ifdef SQLITE_DEBUG
+#ifdef SQLITE_MEMDEBUG
     sqlite3_iMallocFail = mallocfail;
 #endif
    }