mirror of
https://github.com/sqlite/sqlite.git
synced 2025-08-08 14:02:16 +03:00
Host parameter names conform to SQL-2003. (CVS 1902)
FossilOrigin-Name: fd584d1ccf6643b723c2ff0a7a16c2aea3f1142c
This commit is contained in:
@@ -11,7 +11,7 @@
|
||||
*************************************************************************
|
||||
** A TCL Interface to SQLite
|
||||
**
|
||||
** $Id: tclsqlite.c,v 1.101 2004/08/24 15:23:34 drh Exp $
|
||||
** $Id: tclsqlite.c,v 1.102 2004/08/25 04:07:02 drh Exp $
|
||||
*/
|
||||
#ifndef NO_TCL /* Omit this whole file if TCL is unavailable */
|
||||
|
||||
@@ -745,7 +745,7 @@ static int DbObjCmd(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){
|
||||
nVar = sqlite3_bind_parameter_count(pStmt);
|
||||
for(i=1; i<=nVar; i++){
|
||||
const char *zVar = sqlite3_bind_parameter_name(pStmt, i);
|
||||
if( zVar[0]=='$' ){
|
||||
if( zVar[0]=='$' || zVar[0]==':' ){
|
||||
Tcl_Obj *pVar = Tcl_GetVar2Ex(interp, &zVar[1], 0, 0);
|
||||
if( pVar ){
|
||||
int n;
|
||||
|
Reference in New Issue
Block a user