Free error message string in the quick start example. (CVS 3225)

FossilOrigin-Name: 1273261ba7a21062217e7fbc3447b5dadf53010f

diff --git a/manifest b/manifest
index 5a596b0a552beba20f03b11ea231dd3377308a2b..c85df4dee044214fb0cdc2d5bfa525e5a79b0c9d 100644 (file)
--- a/manifest
+++ b/manifest
@@ -1,5 +1,5 @@
-C Minor\schanges\sto\slempar.c\sto\sreduce\swarnings\son\ssome\scompilers.\s(CVS\s3224)
-D 2006-06-13T11:15:48
+C Free\serror\smessage\sstring\sin\sthe\squick\sstart\sexample.\s(CVS\s3225)
+D 2006-06-13T11:27:22
 F Makefile.in 56fd6261e83f60724e6dcd764e06ab68cbd53909
 F Makefile.linux-gcc 74ba0eadf88748a9ce3fd03d2a3ede2e6715baec
 F README 9c4e2d6706bdcc3efdd773ce752a8cdab4f90028
@@ -352,7 +352,7 @@ F www/optimizer.tcl d6812a10269bd0d7c488987aac0ad5036cace9dc
 F www/optimizing.tcl f0b2538988d1bbad16cbfe63ec6e8f48c9eb04e5
 F www/optoverview.tcl 815df406a38c9f69b27d37e8f7ede004c6d9f19e
 F www/pragma.tcl 0e6316315d1e418bfc8c31b949a0243aa0f2e65d
-F www/quickstart.tcl 2f3daf8038e82a102e1e8cc877aafa7a413f5f11
+F www/quickstart.tcl 8708a4ca83fbf55c66af1782992626f20c3df095
 F www/shared.gif 265bae80c5b311c5a86e47662821076ffaf5c6ea
 F www/sharedcache.tcl 3ebec81110e606af6fd65a3c4c19562cb173b29c
 F www/speed.tcl 656ed5be8cc9d536353e1a96927b925634a62933
@@ -363,7 +363,7 @@ F www/tclsqlite.tcl bb0d1357328a42b1993d78573e587c6dcbc964b9
 F www/vdbe.tcl 87a31ace769f20d3627a64fa1fade7fed47b90d0
 F www/version3.tcl 890248cf7b70e60c383b0e84d77d5132b3ead42b
 F www/whentouse.tcl 97e2b5cd296f7d8057e11f44427dea8a4c2db513
-P 1f20e1832b38c76d2b0dde5fd720670c2ad0438b
-R 8ef7dad2768e0bc10762badb7466e9c4
+P dae71de10d0f34a001b8070266d4016baafa6623
+R e7376a83f134c36434881f57eb210665
 U drh
-Z 840651fccac8925fbbc23e546109f07f
+Z 57bb6b23cb2de5c6b49e04e433b0f4dd

diff --git a/manifest.uuid b/manifest.uuid
index 85c0c1957bf3c3c088095647b95d58c496d7396e..620ed77714230c1d05aec41dfc7c706a81d8d812 100644 (file)
--- a/manifest.uuid
+++ b/manifest.uuid
@@ -1 +1 @@
-dae71de10d0f34a001b8070266d4016baafa6623
\ No newline at end of file
+1273261ba7a21062217e7fbc3447b5dadf53010f
\ No newline at end of file

diff --git a/www/quickstart.tcl b/www/quickstart.tcl
index 455f17eefc6c07296ec916cd21c6e66708bb11c2..8ae3d725fe7ef4757e3b1ebe119156b1f6781c77 100644 (file)
--- a/www/quickstart.tcl
+++ b/www/quickstart.tcl
@@ -1,7 +1,7 @@
 #
 # Run this TCL script to generate HTML for the quickstart.html file.
 #
-set rcsid {$Id: quickstart.tcl,v 1.7 2005/12/02 01:57:43 drh Exp $}
+set rcsid {$Id: quickstart.tcl,v 1.8 2006/06/13 11:27:22 drh Exp $}
 source common.tcl
 header {SQLite In 5 Minutes Or Less}
 puts {
@@ -98,6 +98,7 @@ int main(int argc, char **argv){
   rc = <b>sqlite3_exec</b>(db, argv[2], callback, 0, &zErrMsg);
   if( rc!=SQLITE_OK ){
     fprintf(stderr, "SQL error: %s\n", zErrMsg);
+    sqlite3_free(zErrMsg);
   }
   <b>sqlite3_close</b>(db);
   return 0;
@@ -106,4 +107,4 @@ int main(int argc, char **argv){
 </li>
 </ul>
 }
-footer {$Id: quickstart.tcl,v 1.7 2005/12/02 01:57:43 drh Exp $}
+footer {$Id: quickstart.tcl,v 1.8 2006/06/13 11:27:22 drh Exp $}