84   Tcl_Interp *interp,  in get_sqlite_pointer()  argument
92     Tcl_WrongNumArgs(interp, 1, objv, "SQLITE-CONNECTION");  in get_sqlite_pointer()
95   if( !Tcl_GetCommandInfo(interp, Tcl_GetString(objv[1]), &cmdInfo) ){  in get_sqlite_pointer()
96     Tcl_AppendResult(interp, "command not found: ",  in get_sqlite_pointer()
102   Tcl_AppendResult(interp, zBuf, 0);  in get_sqlite_pointer()
109 int getDbPointer(Tcl_Interp *interp, const char *zA, sqlite3 **ppDb){  in getDbPointer()  argument
112   if( Tcl_GetCommandInfo(interp, zA, &cmdInfo) ){  in getDbPointer()
125 int getWin32Handle(Tcl_Interp *interp, const char *zA, LPHANDLE phFile){  in getWin32Handle()  argument
144 int sqlite3TestErrCode(Tcl_Interp *interp, sqlite3 *db, int rc){  in sqlite3TestErrCode()  argument
152     Tcl_ResetResult(interp);  in sqlite3TestErrCode()
153     Tcl_AppendResult(interp, zBuf, 0);  in sqlite3TestErrCode()
163   Tcl_Interp *interp,   in getStmtPointer()  argument
184 int sqlite3TestMakePointerStr(Tcl_Interp *interp, char *zPtr, void *p){  in sqlite3TestMakePointerStr()  argument
230   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_io_trace()  argument
236     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in test_io_trace()
271   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in clang_sanitize_address()  argument
285   Tcl_SetObjResult(interp, Tcl_NewIntObj(res));  in clang_sanitize_address()
298   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_exec_printf()  argument
309     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in test_exec_printf()
313   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_exec_printf()
319   Tcl_AppendElement(interp, zBuf);  in test_exec_printf()
320   Tcl_AppendElement(interp, rc==SQLITE_OK ? Tcl_DStringValue(&str) : zErr);  in test_exec_printf()
323   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_exec_printf()
336   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_exec_hex()  argument
348     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in test_exec_hex()
352   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_exec_hex()
366   Tcl_AppendElement(interp, zBuf);  in test_exec_hex()
367   Tcl_AppendElement(interp, rc==SQLITE_OK ? Tcl_DStringValue(&str) : zErr);  in test_exec_hex()
370   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_exec_hex()
382   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in db_enter()  argument
388     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in db_enter()
392   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in db_enter()
398   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in db_leave()  argument
404     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in db_leave()
408   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in db_leave()
420   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_exec()  argument
432     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in test_exec()
436   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_exec()
451   Tcl_AppendElement(interp, zBuf);  in test_exec()
452   Tcl_AppendElement(interp, rc==SQLITE_OK ? Tcl_DStringValue(&str) : zErr);  in test_exec()
455   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_exec()
467   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_exec_nr()  argument
475     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in test_exec_nr()
479   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_exec_nr()
481   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_exec_nr()
494   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_mprintf_z()  argument
504   Tcl_AppendResult(interp, zResult, 0);  in test_mprintf_z()
517   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_mprintf_n()  argument
525   Tcl_SetObjResult(interp, Tcl_NewIntObj(n));  in test_mprintf_n()
541   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_snprintf_int()  argument
552   Tcl_AppendResult(interp, zStr, 0);  in test_snprintf_int()
567   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_get_table_printf()  argument
582     if( Tcl_GetInt(interp, argv[4], &resCount) ) return TCL_ERROR;  in test_get_table_printf()
585     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in test_get_table_printf()
589   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_get_table_printf()
600   Tcl_AppendElement(interp, zBuf);  in test_get_table_printf()
604       Tcl_AppendElement(interp, zBuf);  in test_get_table_printf()
606       Tcl_AppendElement(interp, zBuf);  in test_get_table_printf()
609       Tcl_AppendElement(interp, aResult[i] ? aResult[i] : "NULL");  in test_get_table_printf()
612     Tcl_AppendElement(interp, zErr);  in test_get_table_printf()
616   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_get_table_printf()
630   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_last_rowid()  argument
638     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0], " DB\"", 0);  in test_last_rowid()
641   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_last_rowid()
643   Tcl_AppendResult(interp, zBuf, 0);  in test_last_rowid()
654   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_key()  argument
668   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_rekey()  argument
682   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite_test_close()  argument
689     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite_test_close()
693   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in sqlite_test_close()
695   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in sqlite_test_close()
706   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite_test_close_v2()  argument
713     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite_test_close_v2()
717   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in sqlite_test_close_v2()
719   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in sqlite_test_close_v2()
1004   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_create_function()  argument
1012     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in test_create_function()
1016   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_create_function()
1080   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_create_function()
1081   Tcl_SetResult(interp, (char *)t1ErrorName(rc), 0);  in test_create_function()
1094   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_drop_modules()  argument
1101     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in test_drop_modules()
1105   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_drop_modules()
1196   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_create_aggregate()  argument
1203     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in test_create_aggregate()
1207   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_create_aggregate()
1221   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_create_aggregate()
1222   Tcl_SetResult(interp, (char *)t1ErrorName(rc), 0);  in test_create_aggregate()
1237   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_printf()  argument
1242     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in test_printf()
1259   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite3_mprintf_int()  argument
1266     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite3_mprintf_int()
1271     if( Tcl_GetInt(interp, argv[i], &a[i-2]) ) return TCL_ERROR;  in sqlite3_mprintf_int()
1274   Tcl_AppendResult(interp, z, 0);  in sqlite3_mprintf_int()
1286   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite3_mprintf_int64()  argument
1294     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite3_mprintf_int64()
1300       Tcl_AppendResult(interp, "argument is not a valid 64-bit integer", 0);  in sqlite3_mprintf_int64()
1305   Tcl_AppendResult(interp, z, 0);  in sqlite3_mprintf_int64()
1319   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite3_mprintf_long()  argument
1328     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite3_mprintf_long()
1333     if( Tcl_GetInt(interp, argv[i], &b[i-2]) ) return TCL_ERROR;  in sqlite3_mprintf_long()
1338   Tcl_AppendResult(interp, z, 0);  in sqlite3_mprintf_long()
1350   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite3_mprintf_str()  argument
1357     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite3_mprintf_str()
1362     if( Tcl_GetInt(interp, argv[i], &a[i-2]) ) return TCL_ERROR;  in sqlite3_mprintf_str()
1365   Tcl_AppendResult(interp, z, 0);  in sqlite3_mprintf_str()
1377   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite3_snprintf_str()  argument
1385     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite3_snprintf_str()
1389   if( Tcl_GetInt(interp, argv[1], &n) ) return TCL_ERROR;  in sqlite3_snprintf_str()
1391     Tcl_AppendResult(interp, "N must be non-negative", 0);  in sqlite3_snprintf_str()
1395     if( Tcl_GetInt(interp, argv[i], &a[i-3]) ) return TCL_ERROR;  in sqlite3_snprintf_str()
1399   Tcl_AppendResult(interp, z, 0);  in sqlite3_snprintf_str()
1411   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite3_mprintf_double()  argument
1419     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite3_mprintf_double()
1424     if( Tcl_GetInt(interp, argv[i], &a[i-2]) ) return TCL_ERROR;  in sqlite3_mprintf_double()
1426   if( Tcl_GetDouble(interp, argv[4], &r) ) return TCL_ERROR;  in sqlite3_mprintf_double()
1428   Tcl_AppendResult(interp, z, 0);  in sqlite3_mprintf_double()
1442   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite3_mprintf_scaled()  argument
1450     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite3_mprintf_scaled()
1455     if( Tcl_GetDouble(interp, argv[i], &r[i-2]) ) return TCL_ERROR;  in sqlite3_mprintf_scaled()
1458   Tcl_AppendResult(interp, z, 0);  in sqlite3_mprintf_scaled()
1472   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite3_mprintf_stronly()  argument
1478     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite3_mprintf_stronly()
1483   Tcl_AppendResult(interp, z, 0);  in sqlite3_mprintf_stronly()
1496   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite3_mprintf_hexdouble()  argument
1505     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],  in sqlite3_mprintf_hexdouble()
1510     Tcl_AppendResult(interp, "2nd argument should be 16-characters of hex", 0);  in sqlite3_mprintf_hexdouble()
1517   Tcl_AppendResult(interp, z, 0);  in sqlite3_mprintf_hexdouble()
1529   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_enable_shared()  argument
1538     Tcl_WrongNumArgs(interp, 1, objv, "?BOOLEAN?");  in test_enable_shared()
1544     if( Tcl_GetBooleanFromObj(interp, objv[1], &enable) ){  in test_enable_shared()
1549       Tcl_SetResult(interp, (char *)sqlite3ErrStr(rc), TCL_STATIC);  in test_enable_shared()
1553   Tcl_SetObjResult(interp, Tcl_NewBooleanObj(ret));  in test_enable_shared()
1566   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_extended_result_codes()  argument
1574     Tcl_WrongNumArgs(interp, 1, objv, "DB BOOLEAN");  in test_extended_result_codes()
1577   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_extended_result_codes()
1578   if( Tcl_GetBooleanFromObj(interp, objv[2], &enable) ) return TCL_ERROR;  in test_extended_result_codes()
1589   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_libversion_number()  argument
1593   Tcl_SetObjResult(interp, Tcl_NewIntObj(sqlite3_libversion_number()));  in test_libversion_number()
1603   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_table_column_metadata()  argument
1621     Tcl_WrongNumArgs(interp, 1, objv, "DB dbname tblname colname");  in test_table_column_metadata()
1624   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_table_column_metadata()
1635     Tcl_AppendResult(interp, sqlite3_errmsg(db), 0);  in test_table_column_metadata()
1645   Tcl_SetObjResult(interp, pRet);  in test_table_column_metadata()
1653   Tcl_Interp *interp,   in blobHandleFromObj()  argument
1668     channel = Tcl_GetChannel(interp, z, &notUsed);  in blobHandleFromObj()
1683   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_blob_reopen()  argument
1692     Tcl_WrongNumArgs(interp, 1, objv, "CHANNEL ROWID");  in test_blob_reopen()
1696   if( blobHandleFromObj(interp, objv[1], &pBlob) ) return TCL_ERROR;  in test_blob_reopen()
1697   if( Tcl_GetWideIntFromObj(interp, objv[2], &iRowid) ) return TCL_ERROR;  in test_blob_reopen()
1701     Tcl_SetResult(interp, (char *)sqlite3ErrName(rc), TCL_VOLATILE);  in test_blob_reopen()
1716   Tcl_Interp *interp;  member
1724   int rc = Tcl_EvalObjEx(p->interp, p->pDel, TCL_EVAL_DIRECT|TCL_EVAL_GLOBAL);  in testCreateCollationDel()
1726     Tcl_BackgroundError(p->interp);  in testCreateCollationDel()
1748   if( TCL_OK!=Tcl_EvalObjEx(p->interp, pScript, TCL_EVAL_DIRECT|TCL_EVAL_GLOBAL)  in testCreateCollationCmp()
1749    || TCL_OK!=Tcl_GetIntFromObj(p->interp, Tcl_GetObjResult(p->interp), &iRes)  in testCreateCollationCmp()
1751     Tcl_BackgroundError(p->interp);  in testCreateCollationCmp()
1759   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_create_collation_v2()  argument
1768     Tcl_WrongNumArgs(interp, 1, objv, "DB-HANDLE NAME CMP-PROC DEL-PROC");  in test_create_collation_v2()
1771   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_create_collation_v2()
1776   p->interp = interp;  in test_create_collation_v2()
1784     Tcl_AppendResult(interp, "sqlite3_create_collate_v2() failed to detect "  in test_create_collation_v2()
1806   Tcl_Interp *interp;  member
1821   if( p->interp && p->pDestroy ){  in cf2Destroy()
1822     int rc = Tcl_EvalObjEx(p->interp, p->pDestroy, 0);  in cf2Destroy()
1823     if( rc!=TCL_OK ) Tcl_BackgroundError(p->interp);  in cf2Destroy()
1834   Tcl_Interp *interp,             /* The invoking TCL interpreter */  in test_create_function_v2()  argument
1860     Tcl_WrongNumArgs(interp, 1, objv, "DB NAME NARG ENC SWITCHES...");  in test_create_function_v2()
1864   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_create_function_v2()
1866   if( Tcl_GetIntFromObj(interp, objv[3], &nArg) ) return TCL_ERROR;  in test_create_function_v2()
1867   if( Tcl_GetIndexFromObjStruct(interp, objv[4], aEnc, sizeof(aEnc[0]),   in test_create_function_v2()
1877   p->interp = interp;  in test_create_function_v2()
1882     if( Tcl_GetIndexFromObj(interp, objv[i], azSwitch, "switch", 0, &iSwitch) ){  in test_create_function_v2()
1911     Tcl_ResetResult(interp);  in test_create_function_v2()
1912     Tcl_AppendResult(interp, sqlite3ErrName(rc), 0);  in test_create_function_v2()
1923   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_load_extension()  argument
1936     Tcl_WrongNumArgs(interp, 1, objv, "DB-HANDLE FILE ?PROC?");  in test_load_extension()
1946   if( !Tcl_GetCommandInfo(interp, zDb, &cmdInfo) ){  in test_load_extension()
1947     Tcl_AppendResult(interp, "command not found: ", zDb, (char*)0);  in test_load_extension()
1966     Tcl_SetResult(interp, zErr ? zErr : "", TCL_VOLATILE);  in test_load_extension()
1981   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_enable_load()  argument
1991     Tcl_WrongNumArgs(interp, 1, objv, "DB-HANDLE ONOFF");  in test_enable_load()
1997   if( !Tcl_GetCommandInfo(interp, zDb, &cmdInfo) ){  in test_enable_load()
1998     Tcl_AppendResult(interp, "command not found: ", zDb, (char*)0);  in test_enable_load()
2005   if( Tcl_GetBooleanFromObj(interp, objv[2], &onoff) ){  in test_enable_load()
2010   Tcl_AppendResult(interp, "this build omits sqlite3_load_extension()");  in test_enable_load()
2027   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in sqlite_abort()  argument
2038   assert( interp==0 );   /* This will always fail */  in sqlite_abort()
2086   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_register_func()  argument
2093     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in test_register_func()
2097   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_register_func()
2101     Tcl_AppendResult(interp, sqlite3ErrStr(rc), 0);  in test_register_func()
2104   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_register_func()
2115   Tcl_Interp *interp,  in test_finalize()  argument
2124     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_finalize()
2129   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_finalize()
2135   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in test_finalize()
2136   if( db && sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_finalize()
2147   Tcl_Interp *interp,  in test_stmt_status()  argument
2169     Tcl_WrongNumArgs(interp, 1, objv, "STMT PARAMETER RESETFLAG");  in test_stmt_status()
2172   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_stmt_status()
2181     if( Tcl_GetIntFromObj(interp, objv[2], &op) ) return TCL_ERROR;  in test_stmt_status()
2183   if( Tcl_GetBooleanFromObj(interp, objv[3], &resetFlag) ) return TCL_ERROR;  in test_stmt_status()
2185   Tcl_SetObjResult(interp, Tcl_NewIntObj(iValue));  in test_stmt_status()
2195   Tcl_Interp *interp,  in test_stmt_scanstatus()  argument
2210     Tcl_WrongNumArgs(interp, 1, objv, "STMT IDX");  in test_stmt_scanstatus()
2213   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_stmt_scanstatus()
2214   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_stmt_scanstatus()
2233     Tcl_SetObjResult(interp, pRet);  in test_stmt_scanstatus()
2235     Tcl_ResetResult(interp);  in test_stmt_scanstatus()
2245   Tcl_Interp *interp,  in test_stmt_scanstatus_reset()  argument
2251     Tcl_WrongNumArgs(interp, 1, objv, "STMT");  in test_stmt_scanstatus_reset()
2254   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_stmt_scanstatus_reset()
2268   Tcl_Interp *interp,  in test_config_sqllog()  argument
2273     Tcl_WrongNumArgs(interp, 1, objv, "");  in test_config_sqllog()
2288   Tcl_Interp *interp,  in test_config_sorterref()  argument
2294     Tcl_WrongNumArgs(interp, 1, objv, "NBYTE");  in test_config_sorterref()
2297   if( Tcl_GetIntFromObj(interp, objv[1], &iVal) ) return TCL_ERROR;  in test_config_sorterref()
2309   Tcl_Interp *interp,  in vfsCurrentTimeInt64()  argument
2316     Tcl_WrongNumArgs(interp, 1, objv, "");  in vfsCurrentTimeInt64()
2320   Tcl_SetObjResult(interp, Tcl_NewWideIntObj(t));  in vfsCurrentTimeInt64()
2330   Tcl_Interp *interp,  in test_snapshot_get()  argument
2340     Tcl_WrongNumArgs(interp, 1, objv, "DB DBNAME");  in test_snapshot_get()
2343   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_snapshot_get()
2348     Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1));  in test_snapshot_get()
2352     if( sqlite3TestMakePointerStr(interp, zBuf, pSnapshot) ) return TCL_ERROR;  in test_snapshot_get()
2353     Tcl_SetObjResult(interp, Tcl_NewStringObj(zBuf, -1));  in test_snapshot_get()
2365   Tcl_Interp *interp,  in test_snapshot_recover()  argument
2374     Tcl_WrongNumArgs(interp, 1, objv, "DB DBNAME");  in test_snapshot_recover()
2377   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_snapshot_recover()
2382     Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1));  in test_snapshot_recover()
2385     Tcl_ResetResult(interp);  in test_snapshot_recover()
2397   Tcl_Interp *interp,  in test_snapshot_open()  argument
2407     Tcl_WrongNumArgs(interp, 1, objv, "DB DBNAME SNAPSHOT");  in test_snapshot_open()
2410   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_snapshot_open()
2416     Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1));  in test_snapshot_open()
2419     Tcl_ResetResult(interp);  in test_snapshot_open()
2431   Tcl_Interp *interp,  in test_snapshot_free()  argument
2437     Tcl_WrongNumArgs(interp, 1, objv, "SNAPSHOT");  in test_snapshot_free()
2452   Tcl_Interp *interp,  in test_snapshot_cmp()  argument
2460     Tcl_WrongNumArgs(interp, 1, objv, "SNAPSHOT1 SNAPSHOT2");  in test_snapshot_cmp()
2466   Tcl_SetObjResult(interp, Tcl_NewIntObj(res));  in test_snapshot_cmp()
2477   Tcl_Interp *interp,  in test_snapshot_get_blob()  argument
2487     Tcl_WrongNumArgs(interp, 1, objv, "DB DBNAME");  in test_snapshot_get_blob()
2490   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_snapshot_get_blob()
2495     Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1));  in test_snapshot_get_blob()
2498     Tcl_SetObjResult(interp,   in test_snapshot_get_blob()
2513   Tcl_Interp *interp,  in test_snapshot_open_blob()  argument
2524     Tcl_WrongNumArgs(interp, 1, objv, "DB DBNAME SNAPSHOT");  in test_snapshot_open_blob()
2527   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_snapshot_open_blob()
2531     Tcl_AppendResult(interp, "bad SNAPSHOT", 0);  in test_snapshot_open_blob()
2536     Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1));  in test_snapshot_open_blob()
2549   Tcl_Interp *interp,  in test_snapshot_cmp_blob()  argument
2560     Tcl_WrongNumArgs(interp, 1, objv, "SNAPSHOT1 SNAPSHOT2");  in test_snapshot_cmp_blob()
2568     Tcl_AppendResult(interp, "bad SNAPSHOT", 0);  in test_snapshot_cmp_blob()
2573   Tcl_SetObjResult(interp, Tcl_NewIntObj(res));  in test_snapshot_cmp_blob()
2584   Tcl_Interp *interp,  in test_delete_database()  argument
2591     Tcl_WrongNumArgs(interp, 1, objv, "FILE");  in test_delete_database()
2597   Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1));  in test_delete_database()
2606   Tcl_Interp *interp,  in test_atomic_batch_write()  argument
2618     Tcl_WrongNumArgs(interp, 1, objv, "PATH");  in test_atomic_batch_write()
2625     Tcl_AppendResult(interp, sqlite3_errmsg(db), 0);  in test_atomic_batch_write()
2636   Tcl_SetObjResult(interp, Tcl_NewIntObj(bRes));  in test_atomic_batch_write()
2648   Tcl_Interp *interp,  in test_next_stmt()  argument
2657     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_next_stmt()
2662   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_next_stmt()
2663   if( getStmtPointer(interp, Tcl_GetString(objv[2]), &pStmt) ) return TCL_ERROR;  in test_next_stmt()
2666     if( sqlite3TestMakePointerStr(interp, zBuf, pStmt) ) return TCL_ERROR;  in test_next_stmt()
2667     Tcl_AppendResult(interp, zBuf, 0);  in test_next_stmt()
2680   Tcl_Interp *interp,  in test_stmt_readonly()  argument
2688     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_stmt_readonly()
2693   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_stmt_readonly()
2695   Tcl_SetObjResult(interp, Tcl_NewBooleanObj(rc));  in test_stmt_readonly()
2707   Tcl_Interp *interp,  in test_stmt_isexplain()  argument
2715     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_stmt_isexplain()
2720   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_stmt_isexplain()
2722   Tcl_SetObjResult(interp, Tcl_NewIntObj(rc));  in test_stmt_isexplain()
2734   Tcl_Interp *interp,  in test_stmt_busy()  argument
2742     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_stmt_busy()
2747   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_stmt_busy()
2749   Tcl_SetObjResult(interp, Tcl_NewBooleanObj(rc));  in test_stmt_busy()
2760   Tcl_Interp *interp,  in uses_stmt_journal()  argument
2767     Tcl_AppendResult(interp, "wrong # args: should be \"",  in uses_stmt_journal()
2772   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in uses_stmt_journal()
2774   Tcl_SetObjResult(interp, Tcl_NewBooleanObj(((Vdbe *)pStmt)->usesStmtJournal));  in uses_stmt_journal()
2786   Tcl_Interp *interp,  in test_reset()  argument
2794     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_reset()
2799   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_reset()
2802   if( pStmt && sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ){  in test_reset()
2805   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in test_reset()
2821   Tcl_Interp *interp,  in test_expired()  argument
2828     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_expired()
2832   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_expired()
2833   Tcl_SetObjResult(interp, Tcl_NewBooleanObj(sqlite3_expired(pStmt)));  in test_expired()
2845   Tcl_Interp *interp,  in test_transfer_bind()  argument
2852     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_transfer_bind()
2856   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt1)) return TCL_ERROR;  in test_transfer_bind()
2857   if( getStmtPointer(interp, Tcl_GetString(objv[2]), &pStmt2)) return TCL_ERROR;  in test_transfer_bind()
2858   Tcl_SetObjResult(interp,   in test_transfer_bind()
2872   Tcl_Interp *interp,  in test_changes()  argument
2878     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_changes()
2882   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_changes()
2883   Tcl_SetObjResult(interp, Tcl_NewIntObj(sqlite3_changes(db)));  in test_changes()
2907   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_bind()  argument
2915     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in test_bind()
2919   if( getStmtPointer(interp, argv[1], &pStmt) ) return TCL_ERROR;  in test_bind()
2920   if( Tcl_GetInt(interp, argv[2], &idx) ) return TCL_ERROR;  in test_bind()
2933     Tcl_AppendResult(interp, "4th argument should be "  in test_bind()
2937   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind()
2941     Tcl_AppendResult(interp, zBuf, sqlite3ErrStr(rc), 0);  in test_bind()
3029   Tcl_Interp *interp,  in test_collate()  argument
3039   pTestCollateInterp = interp;  in test_collate()
3040   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_collate()
3042   if( TCL_OK!=Tcl_GetBooleanFromObj(interp, objv[2], &val) ) return TCL_ERROR;  in test_collate()
3047     if( TCL_OK!=Tcl_GetBooleanFromObj(interp, objv[3], &val) ) return TCL_ERROR;  in test_collate()
3050     if( TCL_OK!=Tcl_GetBooleanFromObj(interp, objv[4], &val) ) return TCL_ERROR;  in test_collate()
3070   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_collate()
3073     Tcl_AppendResult(interp, sqlite3ErrName(rc), 0);  in test_collate()
3079   Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_collate()
3103   Tcl_Interp *interp,  in test_utf16bin_collate()  argument
3111   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_utf16bin_collate()
3116   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_utf16bin_collate()
3120   Tcl_WrongNumArgs(interp, 1, objv, "DB");  in test_utf16bin_collate()
3160   Tcl_Interp *interp,  in test_collate_needed()  argument
3168   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_collate_needed()
3171   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_collate_needed()
3175   Tcl_WrongNumArgs(interp, 1, objv, "DB");  in test_collate_needed()
3211   Tcl_Interp *interp,  in add_alignment_test_collations()  argument
3217     if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in add_alignment_test_collations()
3258   Tcl_Interp *interp;  in test_function_utf8()  local
3261   interp = (Tcl_Interp *)sqlite3_user_data(pCtx);  in test_function_utf8()
3264   Tcl_ListObjAppendElement(interp, pX, Tcl_NewStringObj("UTF-8", -1));  in test_function_utf8()
3265   Tcl_ListObjAppendElement(interp, pX,   in test_function_utf8()
3267   Tcl_EvalObjEx(interp, pX, 0);  in test_function_utf8()
3269   sqlite3_result_text(pCtx, Tcl_GetStringResult(interp), -1, SQLITE_TRANSIENT);  in test_function_utf8()
3271   sqlite3ValueSetStr(pVal, -1, Tcl_GetStringResult(interp),   in test_function_utf8()
3282   Tcl_Interp *interp;  in test_function_utf16le()  local
3285   interp = (Tcl_Interp *)sqlite3_user_data(pCtx);  in test_function_utf16le()
3288   Tcl_ListObjAppendElement(interp, pX, Tcl_NewStringObj("UTF-16LE", -1));  in test_function_utf16le()
3289   Tcl_ListObjAppendElement(interp, pX,   in test_function_utf16le()
3291   Tcl_EvalObjEx(interp, pX, 0);  in test_function_utf16le()
3294   sqlite3ValueSetStr(pVal, -1, Tcl_GetStringResult(interp),   in test_function_utf16le()
3304   Tcl_Interp *interp;  in test_function_utf16be()  local
3307   interp = (Tcl_Interp *)sqlite3_user_data(pCtx);  in test_function_utf16be()
3310   Tcl_ListObjAppendElement(interp, pX, Tcl_NewStringObj("UTF-16BE", -1));  in test_function_utf16be()
3311   Tcl_ListObjAppendElement(interp, pX,   in test_function_utf16be()
3313   Tcl_EvalObjEx(interp, pX, 0);  in test_function_utf16be()
3316   sqlite3ValueSetStr(pVal, -1, Tcl_GetStringResult(interp),   in test_function_utf16be()
3329   Tcl_Interp *interp,  in test_function()  argument
3338   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_function()
3340   if( TCL_OK!=Tcl_GetBooleanFromObj(interp, objv[2], &val) ) return TCL_ERROR;  in test_function()
3343         interp, test_function_utf8, 0, 0);  in test_function()
3345   if( TCL_OK!=Tcl_GetBooleanFromObj(interp, objv[3], &val) ) return TCL_ERROR;  in test_function()
3348         interp, test_function_utf16le, 0, 0);  in test_function()
3350   if( TCL_OK!=Tcl_GetBooleanFromObj(interp, objv[4], &val) ) return TCL_ERROR;  in test_function()
3353         interp, test_function_utf16be, 0, 0);  in test_function()
3358   Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_function()
3374   Tcl_Interp *interp,  in test_errstr()  argument
3381     Tcl_WrongNumArgs(interp, 1, objv, "<error code>");  in test_errstr()
3388   Tcl_SetResult(interp, (char *)sqlite3ErrStr(i), 0);  in test_errstr()
3407   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_breakpoint()  argument
3423   Tcl_Interp *interp,  in test_bind_zeroblob()  argument
3433     Tcl_WrongNumArgs(interp, 1, objv, "STMT IDX N");  in test_bind_zeroblob()
3437   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_zeroblob()
3438   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_zeroblob()
3439   if( Tcl_GetIntFromObj(interp, objv[3], &n) ) return TCL_ERROR;  in test_bind_zeroblob()
3442   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind_zeroblob()
3459   Tcl_Interp *interp,  in test_bind_zeroblob64()  argument
3469     Tcl_WrongNumArgs(interp, 1, objv, "STMT IDX N");  in test_bind_zeroblob64()
3473   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_zeroblob64()
3474   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_zeroblob64()
3475   if( Tcl_GetWideIntFromObj(interp, objv[3], &n) ) return TCL_ERROR;  in test_bind_zeroblob64()
3478   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind_zeroblob64()
3480     Tcl_AppendResult(interp, sqlite3ErrName(rc), 0);  in test_bind_zeroblob64()
3496   Tcl_Interp *interp,  in test_bind_int()  argument
3506     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_bind_int()
3511   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_int()
3512   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_int()
3513   if( Tcl_GetIntFromObj(interp, objv[3], &value) ) return TCL_ERROR;  in test_bind_int()
3516   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind_int()
3536   Tcl_Interp *interp,  in test_intarray_addr()  argument
3549       if( Tcl_GetIntFromObj(interp, objv[1+i], &p[i]) ){  in test_intarray_addr()
3556   Tcl_SetObjResult(interp, Tcl_NewWideIntObj((sqlite3_int64)p));  in test_intarray_addr()
3570   Tcl_Interp *interp,  in test_int64array_addr()  argument
3584       if( Tcl_GetWideIntFromObj(interp, objv[1+i], &v) ){  in test_int64array_addr()
3592   Tcl_SetObjResult(interp, Tcl_NewWideIntObj((sqlite3_int64)p));  in test_int64array_addr()
3606   Tcl_Interp *interp,  in test_doublearray_addr()  argument
3619       if( Tcl_GetDoubleFromObj(interp, objv[1+i], &p[i]) ){  in test_doublearray_addr()
3626   Tcl_SetObjResult(interp, Tcl_NewWideIntObj((sqlite3_int64)p));  in test_doublearray_addr()
3640   Tcl_Interp *interp,  in test_textarray_addr()  argument
3659   Tcl_SetObjResult(interp, Tcl_NewWideIntObj((sqlite3_int64)p));  in test_textarray_addr()
3673   Tcl_Interp *interp,  in test_bind_int64()  argument
3683     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_bind_int64()
3688   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_int64()
3689   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_int64()
3690   if( Tcl_GetWideIntFromObj(interp, objv[3], &value) ) return TCL_ERROR;  in test_bind_int64()
3693   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind_int64()
3711   Tcl_Interp *interp,  in test_bind_double()  argument
3739     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_bind_double()
3744   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_double()
3745   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_double()
3766          Tcl_GetDoubleFromObj(interp, objv[3], &value) ){  in test_bind_double()
3770   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind_double()
3787   Tcl_Interp *interp,  in test_bind_null()  argument
3796     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_bind_null()
3801   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_null()
3802   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_null()
3805   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind_null()
3823   Tcl_Interp *interp,  in test_bind_text()  argument
3836     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_bind_text()
3841   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_text()
3842   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_text()
3844   if( Tcl_GetIntFromObj(interp, objv[4], &bytes) ) return TCL_ERROR;  in test_bind_text()
3848       Tcl_AppendResult(interp, "out of memory", (void*)0);  in test_bind_text()
3857   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind_text()
3859     Tcl_AppendResult(interp, sqlite3ErrName(rc), (void*)0);  in test_bind_text()
3876   Tcl_Interp *interp,  in test_bind_text16()  argument
3896     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_bind_text16()
3901   if( getStmtPointer(interp, Tcl_GetString(oStmt), &pStmt) ) return TCL_ERROR;  in test_bind_text16()
3902   if( Tcl_GetIntFromObj(interp, oN, &idx) ) return TCL_ERROR;  in test_bind_text16()
3904   if( Tcl_GetIntFromObj(interp, oBytes, &bytes) ) return TCL_ERROR;  in test_bind_text16()
3908       Tcl_AppendResult(interp, "out of memory", (void*)0);  in test_bind_text16()
3917   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind_text16()
3919     Tcl_AppendResult(interp, sqlite3ErrName(rc), 0);  in test_bind_text16()
3936   Tcl_Interp *interp,  in test_bind_blob()  argument
3948     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_bind_blob()
3958   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_blob()
3959   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_blob()
3962   if( Tcl_GetIntFromObj(interp, objv[4], &bytes) ) return TCL_ERROR;  in test_bind_blob()
3968     Tcl_AppendResult(interp, zBuf, (char*)0);  in test_bind_blob()
3973   if( sqlite3TestErrCode(interp, StmtToDb(pStmt), rc) ) return TCL_ERROR;  in test_bind_blob()
3991   Tcl_Interp *interp,  in test_bind_value_from_preupdate()  argument
4003     Tcl_WrongNumArgs(interp, 1, objv, "STMT N NEW|OLD IDX");  in test_bind_value_from_preupdate()
4007   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_value_from_preupdate()
4008   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_value_from_preupdate()
4010   if( Tcl_GetIntFromObj(interp, objv[4], &bidx) ) return TCL_ERROR;  in test_bind_value_from_preupdate()
4019     Tcl_AppendResult(interp, "expected new or old, got: ", z3, (char*)0);  in test_bind_value_from_preupdate()
4036   Tcl_Interp *interp,  in test_bind_value_from_select()  argument
4048     Tcl_WrongNumArgs(interp, 1, objv, "STMT N SELECT");  in test_bind_value_from_select()
4052   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_value_from_select()
4053   if( Tcl_GetIntFromObj(interp, objv[2], &idx) ) return TCL_ERROR;  in test_bind_value_from_select()
4059     Tcl_AppendResult(interp, "error in SQL: ", sqlite3_errmsg(db), (char*)0);  in test_bind_value_from_select()
4068     Tcl_AppendResult(interp,   in test_bind_value_from_select()
4095   Tcl_Interp *interp,  in test_carray_bind()  argument
4161       Tcl_AppendResult(interp, "unknown option: ", z, (char*)0);  in test_carray_bind()
4166     Tcl_AppendResult(interp, "text data must be either -static or -transient",  in test_carray_bind()
4171     Tcl_AppendResult(interp, "cannot be both -static and -transient",  in test_carray_bind()
4176     Tcl_WrongNumArgs(interp, 1, objv, "[OPTIONS] STMT IDX VALUE ...");  in test_carray_bind()
4179   if( getStmtPointer(interp, Tcl_GetString(objv[i]), &pStmt) ) return TCL_ERROR;  in test_carray_bind()
4181   if( Tcl_GetIntFromObj(interp, objv[i], &idx) ) return TCL_ERROR;  in test_carray_bind()
4190         if( Tcl_GetIntFromObj(interp, objv[i+j], &v) ){  in test_carray_bind()
4204         if( Tcl_GetWideIntFromObj(interp, objv[i+j], &v) ){  in test_carray_bind()
4218         if( Tcl_GetDoubleFromObj(interp, objv[i+j], &v) ){  in test_carray_bind()
4259     Tcl_AppendResult(interp, sqlite3_errstr(rc), (char*)0);  in test_carray_bind()
4273   Tcl_Interp *interp,  in test_bind_parameter_count()  argument
4280     Tcl_WrongNumArgs(interp, 1, objv, "STMT");  in test_bind_parameter_count()
4283   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_parameter_count()
4284   Tcl_SetObjResult(interp, Tcl_NewIntObj(sqlite3_bind_parameter_count(pStmt)));  in test_bind_parameter_count()
4297   Tcl_Interp *interp,  in test_bind_parameter_name()  argument
4305     Tcl_WrongNumArgs(interp, 1, objv, "STMT N");  in test_bind_parameter_name()
4308   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_parameter_name()
4309   if( Tcl_GetIntFromObj(interp, objv[2], &i) ) return TCL_ERROR;  in test_bind_parameter_name()
4310   Tcl_SetObjResult(interp,   in test_bind_parameter_name()
4324   Tcl_Interp *interp,  in test_bind_parameter_index()  argument
4331     Tcl_WrongNumArgs(interp, 1, objv, "STMT NAME");  in test_bind_parameter_index()
4334   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_bind_parameter_index()
4335   Tcl_SetObjResult(interp,   in test_bind_parameter_index()
4349   Tcl_Interp *interp,  in test_clear_bindings()  argument
4356     Tcl_WrongNumArgs(interp, 1, objv, "STMT");  in test_clear_bindings()
4359   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_clear_bindings()
4360   Tcl_SetObjResult(interp, Tcl_NewIntObj(sqlite3_clear_bindings(pStmt)));  in test_clear_bindings()
4369   Tcl_Interp *interp,  in test_sleep()  argument
4376     Tcl_WrongNumArgs(interp, 1, objv, "MILLISECONDS");  in test_sleep()
4379   if( Tcl_GetIntFromObj(interp, objv[1], &ms) ){  in test_sleep()
4382   Tcl_SetObjResult(interp, Tcl_NewIntObj(sqlite3_sleep(ms)));  in test_sleep()
4394   Tcl_Interp *interp,  in test_ex_errcode()  argument
4402     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_ex_errcode()
4406   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_ex_errcode()
4408   Tcl_AppendResult(interp, (char *)t1ErrorName(rc), 0);  in test_ex_errcode()
4421   Tcl_Interp *interp,  in test_errcode()  argument
4429     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_errcode()
4433   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_errcode()
4435   Tcl_AppendResult(interp, (char *)t1ErrorName(rc), 0);  in test_errcode()
4447   Tcl_Interp *interp,  in test_errmsg()  argument
4455     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_errmsg()
4459   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_errmsg()
4462   Tcl_SetObjResult(interp, Tcl_NewStringObj(zErr, -1));  in test_errmsg()
4475   Tcl_Interp *interp,  in test_error_offset()  argument
4483     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_error_offset()
4487   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_error_offset()
4490   Tcl_SetObjResult(interp, Tcl_NewIntObj(iByteOffset));  in test_error_offset()
4504   Tcl_Interp *interp,  in test_errmsg16()  argument
4515     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_errmsg16()
4519   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_errmsg16()
4526   Tcl_SetObjResult(interp, Tcl_NewByteArrayObj(zErr, bytes));  in test_errmsg16()
4541   Tcl_Interp *interp,  in test_prepare()  argument
4554     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_prepare()
4558   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_prepare()
4560   if( Tcl_GetIntFromObj(interp, objv[3], &bytes) ) return TCL_ERROR;  in test_prepare()
4563   Tcl_ResetResult(interp);  in test_prepare()
4564   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_prepare()
4572     Tcl_ObjSetVar2(interp, objv[4], 0, Tcl_NewStringObj(zTail, bytes), 0);  in test_prepare()
4577     Tcl_AppendResult(interp, zBuf, sqlite3_errmsg(db), 0);  in test_prepare()
4582     if( sqlite3TestMakePointerStr(interp, zBuf, pStmt) ) return TCL_ERROR;  in test_prepare()
4583     Tcl_AppendResult(interp, zBuf, 0);  in test_prepare()
4598   Tcl_Interp *interp,  in test_prepare_v2()  argument
4613     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_prepare_v2()
4617   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_prepare_v2()
4619   if( Tcl_GetIntFromObj(interp, objv[3], &bytes) ) return TCL_ERROR;  in test_prepare_v2()
4640   Tcl_ResetResult(interp);  in test_prepare_v2()
4641   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_prepare_v2()
4646     Tcl_ObjSetVar2(interp, objv[4], 0, Tcl_NewStringObj(zTail, bytes), 0);  in test_prepare_v2()
4651     Tcl_AppendResult(interp, zBuf, sqlite3_errmsg(db), 0);  in test_prepare_v2()
4656     if( sqlite3TestMakePointerStr(interp, zBuf, pStmt) ) return TCL_ERROR;  in test_prepare_v2()
4657     Tcl_AppendResult(interp, zBuf, 0);  in test_prepare_v2()
4672   Tcl_Interp *interp,  in test_prepare_v3()  argument
4687     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_prepare_v3()
4691   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_prepare_v3()
4693   if( Tcl_GetIntFromObj(interp, objv[3], &bytes) ) return TCL_ERROR;  in test_prepare_v3()
4694   if( Tcl_GetIntFromObj(interp, objv[4], &flags) ) return TCL_ERROR;  in test_prepare_v3()
4713   Tcl_ResetResult(interp);  in test_prepare_v3()
4714   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_prepare_v3()
4719     Tcl_ObjSetVar2(interp, objv[5], 0, Tcl_NewStringObj(zTail, bytes), 0);  in test_prepare_v3()
4724     Tcl_AppendResult(interp, zBuf, sqlite3_errmsg(db), 0);  in test_prepare_v3()
4729     if( sqlite3TestMakePointerStr(interp, zBuf, pStmt) ) return TCL_ERROR;  in test_prepare_v3()
4730     Tcl_AppendResult(interp, zBuf, 0);  in test_prepare_v3()
4743   Tcl_Interp *interp,  in test_prepare_tkt3134()  argument
4754     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_prepare_tkt3134()
4758   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_prepare_tkt3134()
4761   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_prepare_tkt3134()
4765     Tcl_AppendResult(interp, zBuf, sqlite3_errmsg(db), 0);  in test_prepare_tkt3134()
4770     if( sqlite3TestMakePointerStr(interp, zBuf, pStmt) ) return TCL_ERROR;  in test_prepare_tkt3134()
4771     Tcl_AppendResult(interp, zBuf, 0);  in test_prepare_tkt3134()
4786   Tcl_Interp *interp,  in test_prepare16()  argument
4802     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_prepare16()
4806   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_prepare16()
4808   if( Tcl_GetIntFromObj(interp, objv[3], &bytes) ) return TCL_ERROR;  in test_prepare16()
4811   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_prepare16()
4824     Tcl_ObjSetVar2(interp, objv[4], 0, pTail, 0);  in test_prepare16()
4829     if( sqlite3TestMakePointerStr(interp, zBuf, pStmt) ) return TCL_ERROR;  in test_prepare16()
4831   Tcl_AppendResult(interp, zBuf, 0);  in test_prepare16()
4846   Tcl_Interp *interp,  in test_prepare16_v2()  argument
4862     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_prepare16_v2()
4866   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_prepare16_v2()
4868   if( Tcl_GetIntFromObj(interp, objv[3], &bytes) ) return TCL_ERROR;  in test_prepare16_v2()
4871   if( sqlite3TestErrCode(interp, db, rc) ) return TCL_ERROR;  in test_prepare16_v2()
4884     Tcl_ObjSetVar2(interp, objv[4], 0, pTail, 0);  in test_prepare16_v2()
4889     if( sqlite3TestMakePointerStr(interp, zBuf, pStmt) ) return TCL_ERROR;  in test_prepare16_v2()
4891   Tcl_AppendResult(interp, zBuf, 0);  in test_prepare16_v2()
4901   Tcl_Interp *interp,  in test_open()  argument
4910     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_open()
4918   if( sqlite3TestMakePointerStr(interp, zBuf, db) ) return TCL_ERROR;  in test_open()
4919   Tcl_AppendResult(interp, zBuf, 0);  in test_open()
4928   Tcl_Interp *interp,  in test_open_v2()  argument
4944     Tcl_WrongNumArgs(interp, 1, objv, "FILENAME FLAGS VFS");  in test_open_v2()
4951   rc = Tcl_ListObjGetElements(interp, objv[2], &nFlag, &apFlag);  in test_open_v2()
4981     rc = Tcl_GetIndexFromObjStruct(interp, apFlag[i], aFlag, sizeof(aFlag[0]),   in test_open_v2()
4989   if( sqlite3TestMakePointerStr(interp, zBuf, db) ) return TCL_ERROR;  in test_open_v2()
4990   Tcl_AppendResult(interp, zBuf, 0);  in test_open_v2()
4999   Tcl_Interp *interp,  in test_open16()  argument
5009     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_open16()
5017   if( sqlite3TestMakePointerStr(interp, zBuf, db) ) return TCL_ERROR;  in test_open16()
5018   Tcl_AppendResult(interp, zBuf, 0);  in test_open16()
5031   Tcl_Interp *interp,  in test_complete16()  argument
5039     Tcl_WrongNumArgs(interp, 1, objv, "<utf-16 sql>");  in test_complete16()
5044   Tcl_SetObjResult(interp, Tcl_NewIntObj(sqlite3_complete16(zBuf)));  in test_complete16()
5056   Tcl_Interp *interp,  in test_normalize()  argument
5065     Tcl_WrongNumArgs(interp, 1, objv, "SQL");  in test_normalize()
5072     Tcl_SetObjResult(interp, Tcl_NewStringObj(zNorm, -1));  in test_normalize()
5085   Tcl_Interp *interp,  in test_step()  argument
5093     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_step()
5098   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_step()
5102   Tcl_SetResult(interp, (char *)t1ErrorName(rc), 0);  in test_step()
5108   Tcl_Interp *interp,  in test_sql()  argument
5115     Tcl_WrongNumArgs(interp, 1, objv, "STMT");  in test_sql()
5119   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_sql()
5120   Tcl_SetResult(interp, (char *)sqlite3_sql(pStmt), TCL_VOLATILE);  in test_sql()
5125   Tcl_Interp *interp,  in test_ex_sql()  argument
5133     Tcl_WrongNumArgs(interp, 1, objv, "STMT");  in test_ex_sql()
5137   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_ex_sql()
5139   Tcl_SetResult(interp, z, TCL_VOLATILE);  in test_ex_sql()
5146   Tcl_Interp *interp,  in test_norm_sql()  argument
5153     Tcl_WrongNumArgs(interp, 1, objv, "STMT");  in test_norm_sql()
5157   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_norm_sql()
5158   Tcl_SetResult(interp, (char *)sqlite3_normalized_sql(pStmt), TCL_VOLATILE);  in test_norm_sql()
5170   Tcl_Interp *interp,  in test_column_count()  argument
5177     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_column_count()
5182   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_column_count()
5184   Tcl_SetObjResult(interp, Tcl_NewIntObj(sqlite3_column_count(pStmt)));  in test_column_count()
5195   Tcl_Interp *interp,  in test_column_type()  argument
5204     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_column_type()
5209   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_column_type()
5210   if( Tcl_GetIntFromObj(interp, objv[2], &col) ) return TCL_ERROR;  in test_column_type()
5215       Tcl_SetResult(interp, "INTEGER", TCL_STATIC);   in test_column_type()
5218       Tcl_SetResult(interp, "NULL", TCL_STATIC);   in test_column_type()
5221       Tcl_SetResult(interp, "FLOAT", TCL_STATIC);   in test_column_type()
5224       Tcl_SetResult(interp, "TEXT", TCL_STATIC);   in test_column_type()
5227       Tcl_SetResult(interp, "BLOB", TCL_STATIC);   in test_column_type()
5244   Tcl_Interp *interp,  in test_column_int64()  argument
5253     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_column_int64()
5258   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_column_int64()
5259   if( Tcl_GetIntFromObj(interp, objv[2], &col) ) return TCL_ERROR;  in test_column_int64()
5262   Tcl_SetObjResult(interp, Tcl_NewWideIntObj(iVal));  in test_column_int64()
5271   Tcl_Interp *interp,  in test_column_blob()  argument
5282     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_column_blob()
5287   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_column_blob()
5288   if( Tcl_GetIntFromObj(interp, objv[2], &col) ) return TCL_ERROR;  in test_column_blob()
5292   Tcl_SetObjResult(interp, Tcl_NewByteArrayObj(pBlob, len));  in test_column_blob()
5303   Tcl_Interp *interp,  in test_column_double()  argument
5312     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_column_double()
5317   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_column_double()
5318   if( Tcl_GetIntFromObj(interp, objv[2], &col) ) return TCL_ERROR;  in test_column_double()
5321   Tcl_SetObjResult(interp, Tcl_NewDoubleObj(rVal));  in test_column_double()
5332   Tcl_Interp *interp,  in test_data_count()  argument
5339     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_data_count()
5344   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_data_count()
5346   Tcl_SetObjResult(interp, Tcl_NewIntObj(sqlite3_data_count(pStmt)));  in test_data_count()
5359   Tcl_Interp *interp,  in test_stmt_utf8()  argument
5370     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_stmt_utf8()
5375   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_stmt_utf8()
5376   if( Tcl_GetIntFromObj(interp, objv[2], &col) ) return TCL_ERROR;  in test_stmt_utf8()
5379     Tcl_SetResult(interp, (char *)zRet, 0);  in test_stmt_utf8()
5386   Tcl_Interp *interp,  in test_global_recover()  argument
5393     Tcl_WrongNumArgs(interp, 1, objv, "");  in test_global_recover()
5397   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in test_global_recover()
5411   Tcl_Interp *interp,  in test_stmt_utf16()  argument
5424     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_stmt_utf16()
5429   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_stmt_utf16()
5430   if( Tcl_GetIntFromObj(interp, objv[2], &col) ) return TCL_ERROR;  in test_stmt_utf16()
5438     Tcl_SetObjResult(interp, pRet);  in test_stmt_utf16()
5455   Tcl_Interp *interp,  in test_stmt_int()  argument
5465     Tcl_AppendResult(interp, "wrong # args: should be \"",   in test_stmt_int()
5470   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_stmt_int()
5471   if( Tcl_GetIntFromObj(interp, objv[2], &col) ) return TCL_ERROR;  in test_stmt_int()
5473   Tcl_SetObjResult(interp, Tcl_NewIntObj(xFunc(pStmt, col)));  in test_stmt_int()
5485   Tcl_Interp *interp,  in test_interrupt()  argument
5491     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0], " DB", 0);  in test_interrupt()
5494   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_interrupt()
5508   Tcl_Interp *interp,  in delete_function()  argument
5515     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in delete_function()
5519   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in delete_function()
5521   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in delete_function()
5534   Tcl_Interp *interp,  in delete_collation()  argument
5541     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in delete_collation()
5545   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in delete_collation()
5547   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in delete_collation()
5559   Tcl_Interp *interp,  in get_autocommit()  argument
5566     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in get_autocommit()
5570   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in get_autocommit()
5572   Tcl_AppendResult(interp, zBuf, 0);  in get_autocommit()
5585   Tcl_Interp *interp,  in test_busy_timeout()  argument
5592     Tcl_AppendResult(interp, "wrong # args: should be \"", argv[0],   in test_busy_timeout()
5596   if( getDbPointer(interp, argv[1], &db) ) return TCL_ERROR;  in test_busy_timeout()
5597   if( Tcl_GetInt(interp, argv[2], &ms) ) return TCL_ERROR;  in test_busy_timeout()
5599   Tcl_AppendResult(interp, sqlite3ErrName(rc), 0);  in test_busy_timeout()
5611   Tcl_Interp *interp,  in tcl_variable_type()  argument
5617     Tcl_WrongNumArgs(interp, 1, objv, "VARIABLE");  in tcl_variable_type()
5620   pVar = Tcl_GetVar2Ex(interp, Tcl_GetString(objv[1]), 0, TCL_LEAVE_ERR_MSG);  in tcl_variable_type()
5623     Tcl_SetObjResult(interp, Tcl_NewStringObj(pVar->typePtr->name, -1));  in tcl_variable_type()
5637   Tcl_Interp *interp,  in test_release_memory()  argument
5645     Tcl_WrongNumArgs(interp, 1, objv, "?N?");  in test_release_memory()
5649     if( Tcl_GetIntFromObj(interp, objv[1], &N) ) return TCL_ERROR;  in test_release_memory()
5654   Tcl_SetObjResult(interp, Tcl_NewIntObj(amt));  in test_release_memory()
5668   Tcl_Interp *interp,  in test_db_release_memory()  argument
5675     Tcl_WrongNumArgs(interp, 1, objv, "DB");  in test_db_release_memory()
5678   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_db_release_memory()
5680   Tcl_SetObjResult(interp, Tcl_NewIntObj(rc));  in test_db_release_memory()
5691   Tcl_Interp *interp,  in test_db_cacheflush()  argument
5698     Tcl_WrongNumArgs(interp, 1, objv, "DB");  in test_db_cacheflush()
5701   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_db_cacheflush()
5704     Tcl_SetResult(interp, (char *)sqlite3ErrStr(rc), TCL_STATIC);  in test_db_cacheflush()
5708   Tcl_ResetResult(interp);  in test_db_cacheflush()
5719   Tcl_Interp *interp,  in test_system_errno()  argument
5726     Tcl_WrongNumArgs(interp, 1, objv, "DB");  in test_system_errno()
5729   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_system_errno()
5731   Tcl_SetObjResult(interp, Tcl_NewIntObj(iErrno));  in test_system_errno()
5742   Tcl_Interp *interp,  in test_db_filename()  argument
5749     Tcl_WrongNumArgs(interp, 1, objv, "DB DBNAME");  in test_db_filename()
5752   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_db_filename()
5754   Tcl_AppendResult(interp, sqlite3_db_filename(db, zDbName), (void*)0);  in test_db_filename()
5766   Tcl_Interp *interp,  in test_db_readonly()  argument
5773     Tcl_WrongNumArgs(interp, 1, objv, "DB DBNAME");  in test_db_readonly()
5776   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_db_readonly()
5778   Tcl_SetObjResult(interp, Tcl_NewIntObj(sqlite3_db_readonly(db, zDbName)));  in test_db_readonly()
5791   Tcl_Interp *interp,  in test_soft_heap_limit()  argument
5798     Tcl_WrongNumArgs(interp, 1, objv, "?N?");  in test_soft_heap_limit()
5802     if( Tcl_GetWideIntFromObj(interp, objv[1], &N) ) return TCL_ERROR;  in test_soft_heap_limit()
5805   Tcl_SetObjResult(interp, Tcl_NewWideIntObj(amt));  in test_soft_heap_limit()
5818   Tcl_Interp *interp,  in test_hard_heap_limit()  argument
5825     Tcl_WrongNumArgs(interp, 1, objv, "?N?");  in test_hard_heap_limit()
5829     if( Tcl_GetWideIntFromObj(interp, objv[1], &N) ) return TCL_ERROR;  in test_hard_heap_limit()
5832   Tcl_SetObjResult(interp, Tcl_NewWideIntObj(amt));  in test_hard_heap_limit()
5843   Tcl_Interp *interp,  in test_thread_cleanup()  argument
5861   Tcl_Interp *interp,  in test_pager_refcounts()  argument
5871     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_pager_refcounts()
5875   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_pager_refcounts()
5888   Tcl_SetObjResult(interp, pResult);  in test_pager_refcounts()
5907   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in working_64bit_int()  argument
5917   Tcl_SetObjResult(interp, Tcl_NewBooleanObj(working));  in working_64bit_int()
5932   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in vfs_unlink_test()  argument
6034   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in vfs_initfail_test()  argument
6062   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in vfs_unregister_all()  argument
6084   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in vfs_reregister_all()  argument
6104   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_test()  argument
6113     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_test()
6117   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in file_control_test()
6139   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_lasterrno_test()  argument
6148     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_lasterrno_test()
6152   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_lasterrno_test()
6157     Tcl_SetObjResult(interp, Tcl_NewIntObj(rc));   in file_control_lasterrno_test()
6161     Tcl_AppendResult(interp, "Unexpected non-zero errno: ",  in file_control_lasterrno_test()
6176   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_data_version()  argument
6187     Tcl_WrongNumArgs(interp, 1, objv, "DB [DBNAME]");  in file_control_data_version()
6190   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_data_version()
6197     Tcl_SetResult(interp, (char *)sqlite3ErrName(rc), TCL_STATIC);  in file_control_data_version()
6201     Tcl_SetResult(interp, (char *)zBuf, TCL_VOLATILE);  in file_control_data_version()
6215   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_chunksize_test()  argument
6225     Tcl_WrongNumArgs(interp, 1, objv, "DB DBNAME SIZE");  in file_control_chunksize_test()
6228   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db)   in file_control_chunksize_test()
6229    || Tcl_GetIntFromObj(interp, objv[3], &nSize)  in file_control_chunksize_test()
6238     Tcl_SetResult(interp, (char *)sqlite3ErrName(rc), TCL_STATIC);  in file_control_chunksize_test()
6252   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_sizehint_test()  argument
6262     Tcl_WrongNumArgs(interp, 1, objv, "DB DBNAME SIZE");  in file_control_sizehint_test()
6265   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db)   in file_control_sizehint_test()
6266    || Tcl_GetWideIntFromObj(interp, objv[3], &nSize)  in file_control_sizehint_test()
6275     Tcl_SetResult(interp, (char *)sqlite3ErrName(rc), TCL_STATIC);  in file_control_sizehint_test()
6290   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_lockproxy_test()  argument
6297     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_lockproxy_test()
6301   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_lockproxy_test()
6322       Tcl_AppendResult(interp, "PWD too big", (void*)0);  in file_control_lockproxy_test()
6328       Tcl_SetObjResult(interp, Tcl_NewIntObj(rc));   in file_control_lockproxy_test()
6333       Tcl_AppendResult(interp, "Lock proxy file did not match the "  in file_control_lockproxy_test()
6338       Tcl_SetObjResult(interp, Tcl_NewIntObj(rc));  in file_control_lockproxy_test()
6343       Tcl_SetObjResult(interp, Tcl_NewIntObj(rc));  in file_control_lockproxy_test()
6360   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_win32_av_retry()  argument
6370     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_win32_av_retry()
6374   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_win32_av_retry()
6377   if( Tcl_GetIntFromObj(interp, objv[2], &a[0]) ) return TCL_ERROR;  in file_control_win32_av_retry()
6378   if( Tcl_GetIntFromObj(interp, objv[3], &a[1]) ) return TCL_ERROR;  in file_control_win32_av_retry()
6381   Tcl_AppendResult(interp, z, (char*)0);  in file_control_win32_av_retry()
6393   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_win32_get_handle()  argument
6403     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_win32_get_handle()
6407   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_win32_get_handle()
6413   Tcl_AppendResult(interp, z, (char*)0);  in file_control_win32_get_handle()
6425   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_win32_set_handle()  argument
6435     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_win32_set_handle()
6439   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_win32_set_handle()
6442   if( getWin32Handle(interp, Tcl_GetString(objv[2]), &hFile) ){  in file_control_win32_set_handle()
6448   Tcl_AppendResult(interp, z, (char*)0);  in file_control_win32_set_handle()
6461   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_persist_wal()  argument
6471     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_persist_wal()
6475   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_persist_wal()
6478   if( Tcl_GetIntFromObj(interp, objv[2], &bPersist) ) return TCL_ERROR;  in file_control_persist_wal()
6481   Tcl_AppendResult(interp, z, (char*)0);  in file_control_persist_wal()
6493   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_powersafe_overwrite()  argument
6503     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_powersafe_overwrite()
6507   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_powersafe_overwrite()
6510   if( Tcl_GetIntFromObj(interp, objv[2], &b) ) return TCL_ERROR;  in file_control_powersafe_overwrite()
6513   Tcl_AppendResult(interp, z, (char*)0);  in file_control_powersafe_overwrite()
6525   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_vfsname()  argument
6534     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_vfsname()
6538   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_vfsname()
6545   Tcl_AppendResult(interp, zVfsName, (char*)0);  in file_control_vfsname()
6555   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_reservebytes()  argument
6565     Tcl_WrongNumArgs(interp, 1, objv, "DB N");  in file_control_reservebytes()
6568   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db)  in file_control_reservebytes()
6569    || Tcl_GetIntFromObj(interp, objv[2], &n)   in file_control_reservebytes()
6575   Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1));  in file_control_reservebytes()
6587   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_tempfilename()  argument
6596     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_tempfilename()
6600   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_tempfilename()
6607   Tcl_AppendResult(interp, zTName, (char*)0);  in file_control_tempfilename()
6619   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in file_control_external_reader()  argument
6629     Tcl_AppendResult(interp, "wrong # args: should be \"",  in file_control_external_reader()
6633   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in file_control_external_reader()
6641     Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in file_control_external_reader()
6644   Tcl_SetObjResult(interp, Tcl_NewIntObj(iRes));  in file_control_external_reader()
6656   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in vfs_list()  argument
6663     Tcl_WrongNumArgs(interp, 1, objv, "");  in vfs_list()
6667     Tcl_ListObjAppendElement(interp, pRet, Tcl_NewStringObj(pVfs->zName, -1));  in vfs_list()
6669   Tcl_SetObjResult(interp, pRet);  in vfs_list()
6681   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_limit()  argument
6713     Tcl_AppendResult(interp, "wrong # args: should be \"",  in test_limit()
6717   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_limit()
6726     Tcl_AppendResult(interp, "unknown limit type: ", zId, (char*)0);  in test_limit()
6729   if( Tcl_GetIntFromObj(interp, objv[3], &val) ) return TCL_ERROR;  in test_limit()
6731   Tcl_SetObjResult(interp, Tcl_NewIntObj(rc));  in test_limit()
6744   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in save_prng_state()  argument
6760   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in restore_prng_state()  argument
6772   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in reset_prng_state()  argument
6796   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in prng_seed()  argument
6803     Tcl_WrongNumArgs(interp, 1, objv, "SEED ?DB?");  in prng_seed()
6806   if( Tcl_GetIntFromObj(interp,objv[1],&i) ) return TCL_ERROR;  in prng_seed()
6807   if( objc==3 && getDbPointer(interp, Tcl_GetString(objv[2]), &db) ){  in prng_seed()
6824   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in extra_schema_checks()  argument
6830     Tcl_WrongNumArgs(interp, 1, objv, "BOOLEAN");  in extra_schema_checks()
6833   if( Tcl_GetBooleanFromObj(interp,objv[1],&i) ) return TCL_ERROR;  in extra_schema_checks()
6846   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in database_may_be_corrupt()  argument
6862   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in database_never_corrupt()  argument
6875   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_pcache_stats()  argument
6888   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewStringObj("current", -1));  in test_pcache_stats()
6889   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewIntObj(nCurrent));  in test_pcache_stats()
6890   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewStringObj("max", -1));  in test_pcache_stats()
6891   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewIntObj(nMax));  in test_pcache_stats()
6892   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewStringObj("min", -1));  in test_pcache_stats()
6893   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewIntObj(nMin));  in test_pcache_stats()
6894   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewStringObj("recyclable", -1));  in test_pcache_stats()
6895   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewIntObj(nRecyclable));  in test_pcache_stats()
6897   Tcl_SetObjResult(interp, pRet);  in test_pcache_stats()
6917   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_unlock_notify()  argument
6925     Tcl_WrongNumArgs(interp, 1, objv, "DB");  in test_unlock_notify()
6929   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in test_unlock_notify()
6932   rc = sqlite3_unlock_notify(db, test_unlock_notify_cb, (void *)interp);  in test_unlock_notify()
6933   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in test_unlock_notify()
6943   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_wal_checkpoint()  argument
6952     Tcl_WrongNumArgs(interp, 1, objv, "DB ?NAME?");  in test_wal_checkpoint()
6956   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in test_wal_checkpoint()
6963   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in test_wal_checkpoint()
6987   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_wal_checkpoint_v2()  argument
7007     Tcl_WrongNumArgs(interp, 1, objv, "DB MODE ?NAME?");  in test_wal_checkpoint_v2()
7014   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) || (  in test_wal_checkpoint_v2()
7016    && TCL_OK!=Tcl_GetIndexFromObj(interp, objv[2], aMode, "mode", 0, &eMode)   in test_wal_checkpoint_v2()
7024     Tcl_ResetResult(interp);  in test_wal_checkpoint_v2()
7025     Tcl_AppendResult(interp, zErrCode, " - ", (char *)sqlite3_errmsg(db), 0);  in test_wal_checkpoint_v2()
7030   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewIntObj(rc==SQLITE_BUSY?1:0));  in test_wal_checkpoint_v2()
7031   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewIntObj(nLog));  in test_wal_checkpoint_v2()
7032   Tcl_ListObjAppendElement(interp, pRet, Tcl_NewIntObj(nCkpt));  in test_wal_checkpoint_v2()
7033   Tcl_SetObjResult(interp, pRet);  in test_wal_checkpoint_v2()
7043   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_wal_autocheckpoint()  argument
7053     Tcl_WrongNumArgs(interp, 1, objv, "DB VALUE");  in test_wal_autocheckpoint()
7057   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db)   in test_wal_autocheckpoint()
7064   Tcl_ResetResult(interp);  in test_wal_autocheckpoint()
7067     Tcl_SetObjResult(interp, Tcl_NewStringObj(zErrCode, -1));  in test_wal_autocheckpoint()
7094   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_sqlite3_log()  argument
7099     Tcl_WrongNumArgs(interp, 1, objv, "SCRIPT");  in test_sqlite3_log()
7111     logcallback.pInterp = interp;  in test_sqlite3_log()
7125   Tcl_Interp *interp,  in runAsObjProc()  argument
7131     Tcl_WrongNumArgs(interp, 1, objv, "COMMAND ...");  in runAsObjProc()
7134   if( !Tcl_GetCommandInfo(interp, Tcl_GetString(objv[1]), &cmdInfo) ){  in runAsObjProc()
7135     Tcl_AppendResult(interp, "command not found: ",  in runAsObjProc()
7140     Tcl_AppendResult(interp, "command has no objProc: ",  in runAsObjProc()
7144   return cmdInfo.objProc(cmdInfo.objClientData, interp, objc-1, objv+1);  in runAsObjProc()
7188   Tcl_Interp *interp,  in test_print_eqp()  argument
7196     Tcl_WrongNumArgs(interp, 1, objv, "STMT");  in test_print_eqp()
7199   if( getStmtPointer(interp, Tcl_GetString(objv[1]), &pStmt) ) return TCL_ERROR;  in test_print_eqp()
7206   Tcl_SetResult(interp, (char *)t1ErrorName(rc), 0);  in test_print_eqp()
7265   Tcl_Interp *interp,  in test_test_control()  argument
7284     Tcl_WrongNumArgs(interp, 1, objv, "VERB ARGS...");  in test_test_control()
7289       interp, objv[1], aVerb, sizeof(aVerb[0]), "VERB", 0, &iVerb  in test_test_control()
7298         Tcl_WrongNumArgs(interp, 2, objv, "DB");  in test_test_control()
7301       if( getDbPointer(interp, Tcl_GetString(objv[2]), &db) ) return TCL_ERROR;  in test_test_control()
7308         Tcl_WrongNumArgs(interp, 2, objv, "0|1|2");  in test_test_control()
7311       if( Tcl_GetIntFromObj(interp, objv[2], &val) ) return TCL_ERROR;  in test_test_control()
7320         Tcl_WrongNumArgs(interp, 2, objv, "DB LIMIT");  in test_test_control()
7323       if( getDbPointer(interp, Tcl_GetString(objv[2]), &db) ) return TCL_ERROR;  in test_test_control()
7324       if( Tcl_GetIntFromObj(interp, objv[3], &val) ) return TCL_ERROR;  in test_test_control()
7334         Tcl_WrongNumArgs(interp, 2, objv, "DB dbName onOff tnum");  in test_test_control()
7337       if( getDbPointer(interp, Tcl_GetString(objv[2]), &db) ) return TCL_ERROR;  in test_test_control()
7339       if( Tcl_GetIntFromObj(interp, objv[4], &onOff) ) return TCL_ERROR;  in test_test_control()
7340       if( Tcl_GetIntFromObj(interp, objv[5], &tnum) ) return TCL_ERROR;  in test_test_control()
7346   Tcl_ResetResult(interp);  in test_test_control()
7356   Tcl_Interp *interp,  in test_getrusage()  argument
7371   Tcl_SetObjResult(interp, Tcl_NewStringObj(buf, -1));  in test_getrusage()
7430   Tcl_Interp *interp,  in win32_file_lock()  argument
7442     Tcl_WrongNumArgs(interp, 1, objv, "FILENAME DELAY1 DELAY2");  in win32_file_lock()
7448     Tcl_AppendResult(interp, zBuf, (char*)0);  in win32_file_lock()
7456     Tcl_AppendResult(interp, "busy", (char*)0);  in win32_file_lock()
7459   if( Tcl_GetIntFromObj(interp, objv[2], &x.delay1) ) return TCL_ERROR;  in win32_file_lock()
7460   if( Tcl_GetIntFromObj(interp, objv[3], &x.delay2) ) return TCL_ERROR;  in win32_file_lock()
7466     Tcl_AppendResult(interp, "cannot open file: ", zFilename, (char*)0);  in win32_file_lock()
7471     Tcl_AppendResult(interp, "cannot create event: ", x.evName, (char*)0);  in win32_file_lock()
7478     Tcl_AppendResult(interp, "wait failed: ", zBuf, (char*)0);  in win32_file_lock()
7494   Tcl_Interp *interp,  in win32_exists_path()  argument
7499     Tcl_WrongNumArgs(interp, 1, objv, "PATH");  in win32_exists_path()
7502   Tcl_SetObjResult(interp, Tcl_NewBooleanObj(  in win32_exists_path()
7516   Tcl_Interp *interp,  in win32_find_file()  argument
7525     Tcl_WrongNumArgs(interp, 1, objv, "PATTERN");  in win32_find_file()
7530     Tcl_SetObjResult(interp, Tcl_NewWideIntObj(GetLastError()));  in win32_find_file()
7536     Tcl_ListObjAppendElement(interp, listObj, Tcl_NewUnicodeObj(  in win32_find_file()
7538     Tcl_ListObjAppendElement(interp, listObj, Tcl_NewWideIntObj(  in win32_find_file()
7545     Tcl_SetObjResult(interp, Tcl_NewWideIntObj(GetLastError()));  in win32_find_file()
7549   Tcl_SetObjResult(interp, listObj);  in win32_find_file()
7561   Tcl_Interp *interp,  in win32_delete_file()  argument
7566     Tcl_WrongNumArgs(interp, 1, objv, "FILENAME");  in win32_delete_file()
7570     Tcl_SetObjResult(interp, Tcl_NewWideIntObj(GetLastError()));  in win32_delete_file()
7573   Tcl_ResetResult(interp);  in win32_delete_file()
7585   Tcl_Interp *interp,  in win32_mkdir()  argument
7590     Tcl_WrongNumArgs(interp, 1, objv, "DIRECTORY");  in win32_mkdir()
7594     Tcl_SetObjResult(interp, Tcl_NewWideIntObj(GetLastError()));  in win32_mkdir()
7597   Tcl_ResetResult(interp);  in win32_mkdir()
7609   Tcl_Interp *interp,  in win32_rmdir()  argument
7614     Tcl_WrongNumArgs(interp, 1, objv, "DIRECTORY");  in win32_rmdir()
7618     Tcl_SetObjResult(interp, Tcl_NewWideIntObj(GetLastError()));  in win32_rmdir()
7621   Tcl_ResetResult(interp);  in win32_rmdir()
7641   Tcl_Interp *interp,  in optimization_control()  argument
7673     Tcl_WrongNumArgs(interp, 1, objv, "DB OPT BOOLEAN");  in optimization_control()
7676   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in optimization_control()
7677   if( Tcl_GetBooleanFromObj(interp, objv[3], &onoff) ) return TCL_ERROR;  in optimization_control()
7687     Tcl_AppendResult(interp, "unknown optimization - should be one of:",  in optimization_control()
7690       Tcl_AppendResult(interp, " ", aOpt[i].zOptName, (char*)0);  in optimization_control()
7695   Tcl_SetObjResult(interp, Tcl_NewIntObj(mask));  in optimization_control()
7706   Tcl_Interp *interp,  in tclLoadStaticExtensionCmd()  argument
7774     Tcl_WrongNumArgs(interp, 1, objv, "DB NAME ...");  in tclLoadStaticExtensionCmd()
7777   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in tclLoadStaticExtensionCmd()
7784       Tcl_AppendResult(interp, "no such extension: ", zName, (char*)0);  in tclLoadStaticExtensionCmd()
7793       Tcl_AppendResult(interp, "initialization of ", zName, " failed: ", zErrMsg,  in tclLoadStaticExtensionCmd()
7808   Tcl_Interp *interp,  in sorter_test_fakeheap()  argument
7814     Tcl_WrongNumArgs(interp, 1, objv, "BOOL");  in sorter_test_fakeheap()
7818   if( Tcl_GetBooleanFromObj(interp, objv[1], &bArg) ){  in sorter_test_fakeheap()
7832   Tcl_ResetResult(interp);  in sorter_test_fakeheap()
7848   Tcl_Interp *interp,  in sorter_test_sort4_helper()  argument
7864     Tcl_WrongNumArgs(interp, 1, objv, "DB SQL1 NSTEP SQL2");  in sorter_test_sort4_helper()
7868   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in sorter_test_sort4_helper()
7870   if( Tcl_GetIntFromObj(interp, objv[3], &nStep) ) return TCL_ERROR;  in sorter_test_sort4_helper()
7880       Tcl_AppendResult(interp, "data error: (a!=b)", 0);  in sorter_test_sort4_helper()
7899     Tcl_AppendResult(interp, "checksum mismatch", 0);  in sorter_test_sort4_helper()
7905   Tcl_AppendResult(interp, "sql error: ", sqlite3_errmsg(db), 0);  in sorter_test_sort4_helper()
7917   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_user_authenticate()  argument
7928     Tcl_WrongNumArgs(interp, 1, objv, "DB USERNAME PASSWORD");  in test_user_authenticate()
7931   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in test_user_authenticate()
7937   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in test_user_authenticate()
7948   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_user_add()  argument
7960     Tcl_WrongNumArgs(interp, 1, objv, "DB USERNAME PASSWORD ISADMIN");  in test_user_add()
7963   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in test_user_add()
7968   Tcl_GetBooleanFromObj(interp, objv[4], &isAdmin);  in test_user_add()
7970   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in test_user_add()
7981   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_user_change()  argument
7993     Tcl_WrongNumArgs(interp, 1, objv, "DB USERNAME PASSWORD ISADMIN");  in test_user_change()
7996   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in test_user_change()
8001   Tcl_GetBooleanFromObj(interp, objv[4], &isAdmin);  in test_user_change()
8003   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in test_user_change()
8014   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_user_delete()  argument
8023     Tcl_WrongNumArgs(interp, 1, objv, "DB USERNAME");  in test_user_delete()
8026   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ){  in test_user_delete()
8031   Tcl_SetResult(interp, (char *)t1ErrorName(rc), TCL_STATIC);  in test_user_delete()
8051   Tcl_Interp *interp,    /* The TCL interpreter that invoked this command */  in test_bad_behavior()  argument
8062     Tcl_WrongNumArgs(interp, 1, objv, "TYPE");  in test_bad_behavior()
8065   if( Tcl_GetIntFromObj(interp, objv[1], &iType) ) return TCL_ERROR;  in test_bad_behavior()
8070       Tcl_SetObjResult(interp, Tcl_NewIntObj(xyz));  in test_bad_behavior()
8076       Tcl_SetObjResult(interp, Tcl_NewIntObj(w[1]));  in test_bad_behavior()
8083       Tcl_SetObjResult(interp, Tcl_NewIntObj(a[i]));  in test_bad_behavior()
8101   Tcl_Interp *interp,  in test_register_dbstat_vtab()  argument
8106   Tcl_AppendResult(interp, "dbstat not available because of "  in test_register_dbstat_vtab()
8115     Tcl_WrongNumArgs(interp, 1, objv, "DB");  in test_register_dbstat_vtab()
8120   if( Tcl_GetCommandInfo(interp, zDb, &cmdInfo) ){  in test_register_dbstat_vtab()
8135   Tcl_Interp *interp,  in test_sqlite3_db_config()  argument
8164     Tcl_WrongNumArgs(interp, 1, objv, "DB SETTING [VALUE]");  in test_sqlite3_db_config()
8167   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_sqlite3_db_config()
8176     Tcl_SetObjResult(interp,  in test_sqlite3_db_config()
8181     if( Tcl_GetIntFromObj(interp, objv[3], &v) ) return TCL_ERROR;  in test_sqlite3_db_config()
8186   Tcl_SetObjResult(interp, Tcl_NewIntObj(v));  in test_sqlite3_db_config()
8198   Tcl_Interp *interp,  in test_sqlite3_txn_state()  argument
8207     Tcl_WrongNumArgs(interp, 1, objv, "DB ?SCHEMA?");  in test_sqlite3_txn_state()
8210   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_sqlite3_txn_state()
8213   Tcl_SetObjResult(interp, Tcl_NewIntObj(iTxn));  in test_sqlite3_txn_state()
8222   Tcl_Interp *interp,  in test_dbconfig_maindbname_icecube()  argument
8230     Tcl_WrongNumArgs(interp, 1, objv, "DB");  in test_dbconfig_maindbname_icecube()
8233     if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_dbconfig_maindbname_icecube()
8235     Tcl_SetObjResult(interp, Tcl_NewIntObj(rc));  in test_dbconfig_maindbname_icecube()
8245   Tcl_Interp *interp,  in test_mmap_warm()  argument
8253     Tcl_WrongNumArgs(interp, 1, objv, "DB ?DBNAME?");  in test_mmap_warm()
8259     if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_mmap_warm()
8264     Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1));  in test_mmap_warm()
8278   Tcl_Interp *interp,  in test_write_db()  argument
8290     Tcl_WrongNumArgs(interp, 1, objv, "DB OFFSET DATA");  in test_write_db()
8293   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_write_db()
8294   if( Tcl_GetWideIntFromObj(interp, objv[2], &iOff) ) return TCL_ERROR;  in test_write_db()
8300   Tcl_SetResult(interp, (char *)sqlite3ErrName(rc), TCL_VOLATILE);  in test_write_db()
8310   Tcl_Interp *interp,  in test_register_cksumvfs()  argument
8315     Tcl_WrongNumArgs(interp, 1, objv, "");  in test_register_cksumvfs()
8320     Tcl_SetResult(interp, (char *)sqlite3ErrName(rc), TCL_VOLATILE);  in test_register_cksumvfs()
8331   Tcl_Interp *interp,  in test_unregister_cksumvfs()  argument
8336     Tcl_WrongNumArgs(interp, 1, objv, "");  in test_unregister_cksumvfs()
8341     Tcl_SetResult(interp, (char *)sqlite3ErrName(rc), TCL_VOLATILE);  in test_unregister_cksumvfs()
8357   Tcl_Interp *interp,  in test_decode_hexdb()  argument
8371     Tcl_WrongNumArgs(interp, 1, objv, "HEXDB");  in test_decode_hexdb()
8385         Tcl_AppendResult(interp, "bad 'pagesize' field", (void*)0);  in test_decode_hexdb()
8390         Tcl_AppendResult(interp, "bad 'size' field", (void*)0);  in test_decode_hexdb()
8395         Tcl_AppendResult(interp, "out of memory", (void*)0);  in test_decode_hexdb()
8418   Tcl_SetObjResult(interp, Tcl_NewByteArrayObj(a, n));  in test_decode_hexdb()
8427   Tcl_Interp *interp;  member
8455   Tcl_ResetResult(pData->interp);  in test_autovacuum_pages_callback()
8456   Tcl_Eval(pData->interp, Tcl_DStringValue(&str));  in test_autovacuum_pages_callback()
8459   (void)Tcl_GetIntFromObj(0, Tcl_GetObjResult(pData->interp), (int*)&x);  in test_autovacuum_pages_callback()
8474   Tcl_Interp *interp,  in test_autovacuum_pages()  argument
8483     Tcl_WrongNumArgs(interp, 1, objv, "DB ?SCRIPT?");  in test_autovacuum_pages()
8486   if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR;  in test_autovacuum_pages()
8492       Tcl_AppendResult(interp, "out of memory", (void*)0);  in test_autovacuum_pages()
8495     pData->interp = interp;  in test_autovacuum_pages()
8507     Tcl_AppendResult(interp, zBuf, (void*)0);  in test_autovacuum_pages()
8517 int Sqlitetest1_Init(Tcl_Interp *interp){  in Sqlitetest1_Init()  argument
8838     Tcl_CreateCommand(interp, aCmd[i].zName, aCmd[i].xProc, 0, 0);  in Sqlitetest1_Init()
8841     Tcl_CreateObjCommand(interp, aObjCmd[i].zName,   in Sqlitetest1_Init()
8844   Tcl_LinkVar(interp, "sqlite_search_count",   in Sqlitetest1_Init()
8846   Tcl_LinkVar(interp, "sqlite_found_count",   in Sqlitetest1_Init()
8848   Tcl_LinkVar(interp, "sqlite_sort_count",   in Sqlitetest1_Init()
8850   Tcl_LinkVar(interp, "sqlite3_max_blobsize",   in Sqlitetest1_Init()
8852   Tcl_LinkVar(interp, "sqlite_like_count",   in Sqlitetest1_Init()
8854   Tcl_LinkVar(interp, "sqlite_interrupt_count",   in Sqlitetest1_Init()
8856   Tcl_LinkVar(interp, "sqlite_open_file_count",   in Sqlitetest1_Init()
8858   Tcl_LinkVar(interp, "sqlite_current_time",   in Sqlitetest1_Init()
8861   Tcl_LinkVar(interp, "sqlite_hostid_num",   in Sqlitetest1_Init()
8864   Tcl_LinkVar(interp, "sqlite3_xferopt_count",  in Sqlitetest1_Init()
8866   Tcl_LinkVar(interp, "sqlite3_pager_readdb_count",  in Sqlitetest1_Init()
8868   Tcl_LinkVar(interp, "sqlite3_pager_writedb_count",  in Sqlitetest1_Init()
8870   Tcl_LinkVar(interp, "sqlite3_pager_writej_count",  in Sqlitetest1_Init()
8873   Tcl_LinkVar(interp, "unaligned_string_counter",  in Sqlitetest1_Init()
8877   Tcl_LinkVar(interp, "sqlite_last_needed_collation",  in Sqlitetest1_Init()
8881   Tcl_LinkVar(interp, "sqlite_os_type",  in Sqlitetest1_Init()
8887     Tcl_LinkVar(interp, "sqlite_query_plan",  in Sqlitetest1_Init()
8892   Tcl_LinkVar(interp, "sqlite_where_trace",  in Sqlitetest1_Init()
8894   Tcl_LinkVar(interp, "sqlite_os_trace",  in Sqlitetest1_Init()
8897   Tcl_LinkVar(interp, "sqlite_wal_trace",  in Sqlitetest1_Init()
8902   Tcl_LinkVar(interp, "sqlite_opentemp_count",  in Sqlitetest1_Init()
8905   Tcl_LinkVar(interp, "sqlite_static_bind_value",  in Sqlitetest1_Init()
8907   Tcl_LinkVar(interp, "sqlite_static_bind_nbyte",  in Sqlitetest1_Init()
8909   Tcl_LinkVar(interp, "sqlite_temp_directory",  in Sqlitetest1_Init()
8911   Tcl_LinkVar(interp, "sqlite_data_directory",  in Sqlitetest1_Init()
8913   Tcl_LinkVar(interp, "bitmask_size",  in Sqlitetest1_Init()
8915   Tcl_LinkVar(interp, "longdouble_size",  in Sqlitetest1_Init()
8917   Tcl_LinkVar(interp, "sqlite_sync_count",  in Sqlitetest1_Init()
8919   Tcl_LinkVar(interp, "sqlite_fullsync_count",  in Sqlitetest1_Init()
8922   Tcl_LinkVar(interp, "sqlite3_unsupported_treetrace",  in Sqlitetest1_Init()
8926   Tcl_LinkVar(interp, "sqlite_fts3_enable_parentheses",  in Sqlitetest1_Init()