diff options
author | drh <drh@noemail.net> | 2004-05-26 16:54:42 +0000 |
---|---|---|
committer | drh <drh@noemail.net> | 2004-05-26 16:54:42 +0000 |
commit | f9b596ebc05ff3365bed6b8dafb02d251c652889 (patch) | |
tree | db56a7ae7dafee19f1d8fe3f947333c0914a7e0e /src/tclsqlite.c | |
parent | b77f5dadbf3e34d9724c836c6871955b59694123 (diff) | |
download | sqlite-f9b596ebc05ff3365bed6b8dafb02d251c652889.tar.gz sqlite-f9b596ebc05ff3365bed6b8dafb02d251c652889.zip |
Remove dataType and includeTypes flags from function definitions. Added new
P3_FUNCDEF type for P3 arguments on opcodes. Fixes to several user functions.
28 tests fail now. (CVS 1464)
FossilOrigin-Name: 36e031625995b2f7baf7654d771ca8fb764a0085
Diffstat (limited to 'src/tclsqlite.c')
-rw-r--r-- | src/tclsqlite.c | 6 |
1 files changed, 1 insertions, 5 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 877ee1056..a1a1a44c9 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -11,7 +11,7 @@ ************************************************************************* ** A TCL Interface to SQLite ** -** $Id: tclsqlite.c,v 1.71 2004/05/26 06:18:38 danielk1977 Exp $ +** $Id: tclsqlite.c,v 1.72 2004/05/26 16:54:46 drh Exp $ */ #ifndef NO_TCL /* Omit this whole file if TCL is unavailable */ @@ -864,7 +864,6 @@ static int DbObjCmd(void *cd, Tcl_Interp *interp, int objc,Tcl_Obj *const*objv){ pFunc->zScript = (char*)&pFunc[1]; strcpy(pFunc->zScript, zScript); sqlite3_create_function(pDb->db, zName, -1, 0, 0, pFunc, tclSqlFunc, 0, 0); - sqlite3_function_type(pDb->db, zName, SQLITE_NUMERIC); break; } @@ -1245,6 +1244,3 @@ int TCLSH_MAIN(int argc, char **argv){ #endif /* TCLSH */ #endif /* !defined(NO_TCL) */ - - - |