database/sqlite
1
0
Fork 0
mirror of https://github.com/sqlite/sqlite.git synced 2025-08-10 01:02:56 +03:00
Code Activity

Reset TCL results when onecolumn or eval methods have no reply.

Browse Source 
Ticket #1887. (CVS 3331)

FossilOrigin-Name: 9c6090c609afa9906029ed4ba22375f5bee058c4
This commit is contained in:
drh
2006-07-12 00:18:40 +00:00
parent 76fe8032c1
commit 050be3294a
3 changed files with 10 additions and 8 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
manifest
View File

@@ -1,5 +1,5 @@
C By\sdefault,\snew\sdatabases\sare\snow\screated\sin\sthe\slegacy\sfile\sformat\s-\sthe\nformat\sthat\signores\sDESC\son\sindices.\s\sIf\syou\swant\sdescending\sindices,\syou\nmust\seither\srecompile\swith\s-DSQLITE_DEFAULT_FILE_FORMAT=4\sor\sissue\n"PRAGMA\slegacy_file_format=OFF"\sprior\sto\screating\sthe\sfirst\stable\sin\sthe\ndatabase.\s(CVS\s3330) C Reset\sTCL\sresults\swhen\sonecolumn\sor\seval\smethods\shave\sno\sreply.\nTicket\s#1887.\s(CVS\s3331)
D 2006-07-11T14:17:52 D 2006-07-12T00:18:41
F Makefile.in 9c2a76055c305868cc5f5b73e29a252ff3632c0a F Makefile.in 9c2a76055c305868cc5f5b73e29a252ff3632c0a
F Makefile.linux-gcc 2d8574d1ba75f129aba2019f0b959db380a90935 F Makefile.linux-gcc 2d8574d1ba75f129aba2019f0b959db380a90935
F README 9c4e2d6706bdcc3efdd773ce752a8cdab4f90028 F README 9c4e2d6706bdcc3efdd773ce752a8cdab4f90028
@@ -76,7 +76,7 @@ F src/sqlite.h.in 432848ac7f8d7e6fea727668acccec62bdd86cc4
F src/sqlite3ext.h c611255287e9a11ce4f1fe6251c2a0b9d32a828b F src/sqlite3ext.h c611255287e9a11ce4f1fe6251c2a0b9d32a828b
F src/sqliteInt.h a413094c83dd3e79f129afb9d453b5680651176b F src/sqliteInt.h a413094c83dd3e79f129afb9d453b5680651176b
F src/table.c d8817f43a6c6bf139487db161760b9e1e02da3f1 F src/table.c d8817f43a6c6bf139487db161760b9e1e02da3f1
F src/tclsqlite.c 22ab598cfaa6fda50dec9035852687114286d06e F src/tclsqlite.c 64c4a41dac9dae0d2258b06c4229e995d5fa7cc4
F src/test1.c 535294d7f21a4127082c4f7a57f225482df9cc36 F src/test1.c 535294d7f21a4127082c4f7a57f225482df9cc36
F src/test2.c ca74a1d8aeb7d9606e8f6b762c5daf85c1a3f92b F src/test2.c ca74a1d8aeb7d9606e8f6b762c5daf85c1a3f92b
F src/test3.c 833dc8346e431182ae6bd0648455c3d4cc65a19f F src/test3.c 833dc8346e431182ae6bd0648455c3d4cc65a19f
@@ -375,7 +375,7 @@ F www/tclsqlite.tcl bb0d1357328a42b1993d78573e587c6dcbc964b9
F www/vdbe.tcl 87a31ace769f20d3627a64fa1fade7fed47b90d0 F www/vdbe.tcl 87a31ace769f20d3627a64fa1fade7fed47b90d0
F www/version3.tcl 890248cf7b70e60c383b0e84d77d5132b3ead42b F www/version3.tcl 890248cf7b70e60c383b0e84d77d5132b3ead42b
F www/whentouse.tcl 97e2b5cd296f7d8057e11f44427dea8a4c2db513 F www/whentouse.tcl 97e2b5cd296f7d8057e11f44427dea8a4c2db513
P b1f326e6959ef3be11f772e80f5ab6dd65b2d065 P 65b60f05ce49ff127bf5044f96db36caf1fa0106
R 58e2d2587eb65892cff29cb33e8999b9 R c2fe2d2fef5276c6e646e7b15fa1fb09
U drh U drh
Z 77fa0dc9a6a18dc5ba3c3f9cbd7ca1bb Z 97a143b73f2650c099952ed39c8d5956

2
manifest.uuid
View File

@@ -1 +1 @@
65b60f05ce49ff127bf5044f96db36caf1fa0106 9c6090c609afa9906029ed4ba22375f5bee058c4

4
src/tclsqlite.c
View File

@@ -11,7 +11,7 @@
************************************************************************* *************************************************************************
** A TCL Interface to SQLite ** A TCL Interface to SQLite
** **
** $Id: tclsqlite.c,v 1.163 2006/07/10 21:15:52 drh Exp $ ** $Id: tclsqlite.c,v 1.164 2006/07/12 00:18:41 drh Exp $
*/ */
#ifndef NO_TCL /* Omit this whole file if TCL is unavailable */ #ifndef NO_TCL /* Omit this whole file if TCL is unavailable */
@@ -1568,6 +1568,8 @@ static int DbObjCmd(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){
Tcl_SetObjResult(interp, pRet); Tcl_SetObjResult(interp, pRet);
} }
Tcl_DecrRefCount(pRet); Tcl_DecrRefCount(pRet);
}else if( rc==TCL_OK ){
Tcl_ResetResult(interp);
} }
break; break;
} }