diff options
Diffstat (limited to 'src/tclsqlite.c')
| -rw-r--r-- | src/tclsqlite.c | 12 |
1 files changed, 7 insertions, 5 deletions
diff --git a/src/tclsqlite.c b/src/tclsqlite.c index 4e3976478..e1ca48373 100644 --- a/src/tclsqlite.c +++ b/src/tclsqlite.c @@ -11,7 +11,7 @@ ************************************************************************* ** A TCL Interface to SQLite ** -** $Id: tclsqlite.c,v 1.59 2004/02/25 22:51:06 rdc Exp $ +** $Id: tclsqlite.c,v 1.60 2004/04/26 14:10:22 drh Exp $ */ #ifndef NO_TCL /* Omit this whole file if TCL is unavailable */ @@ -21,6 +21,7 @@ #include <string.h> #include <assert.h> +#if 0 /* ** If TCL uses UTF-8 and SQLite is configured to use iso8859, then we ** have to do a translation when going between the two. Set the @@ -1155,6 +1156,7 @@ int Sqlite_SafeInit(Tcl_Interp *interp){ int Tclsqlite_SafeInit(Tcl_Interp *interp){ return TCL_OK; } +#endif #if 0 /* @@ -1199,7 +1201,7 @@ int TCLSH_MAIN(int argc, char **argv){ Tcl_Interp *interp; Tcl_FindExecutable(argv[0]); interp = Tcl_CreateInterp(); - Sqlite_Init(interp); + /* Sqlite_Init(interp); */ #ifdef SQLITE_TEST { extern int Sqlitetest1_Init(Tcl_Interp*); @@ -1207,10 +1209,10 @@ int TCLSH_MAIN(int argc, char **argv){ extern int Sqlitetest3_Init(Tcl_Interp*); extern int Sqlitetest4_Init(Tcl_Interp*); extern int Md5_Init(Tcl_Interp*); - Sqlitetest1_Init(interp); + /* Sqlitetest1_Init(interp); */ Sqlitetest2_Init(interp); - Sqlitetest3_Init(interp); - Sqlitetest4_Init(interp); + /* Sqlitetest3_Init(interp); */ + /* Sqlitetest4_Init(interp); */ Md5_Init(interp); } #endif |