Lines Matching refs:interp

21 extern int getDbPointer(Tcl_Interp *interp, const char *zA, sqlite3 **ppDb);
30 Tcl_Interp *interp; member
54 Tcl_ListObjAppendElement(p->interp, pEval, Tcl_DuplicateObj(pCtx->pVal)); in doTestWindowStep()
56 Tcl_ListObjAppendElement(p->interp, pEval, Tcl_NewStringObj("", -1)); in doTestWindowStep()
61 Tcl_ListObjAppendElement(p->interp, pEval, pArg); in doTestWindowStep()
63 rc = Tcl_EvalObjEx(p->interp, pEval, TCL_EVAL_GLOBAL); in doTestWindowStep()
65 zResult = Tcl_GetStringResult(p->interp); in doTestWindowStep()
69 pCtx->pVal = Tcl_DuplicateObj(Tcl_GetObjResult(p->interp)); in doTestWindowStep()
86 Tcl_ListObjAppendElement(p->interp, pEval, Tcl_DuplicateObj(pCtx->pVal)); in doTestWindowFinalize()
88 Tcl_ListObjAppendElement(p->interp, pEval, Tcl_NewStringObj("", -1)); in doTestWindowFinalize()
91 rc = Tcl_EvalObjEx(p->interp, pEval, TCL_EVAL_GLOBAL); in doTestWindowFinalize()
92 zResult = Tcl_GetStringResult(p->interp); in doTestWindowFinalize()
138 Tcl_Interp *interp, in test_create_window() argument
148 Tcl_WrongNumArgs(interp, 1, objv, "DB NAME XSTEP XFINAL XVALUE XINVERSE"); in test_create_window()
152 if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR; in test_create_window()
160 pNew->interp = interp; in test_create_window()
172 Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1)); in test_create_window()
181 Tcl_Interp *interp, in test_create_window_misuse() argument
189 Tcl_WrongNumArgs(interp, 1, objv, "DB"); in test_create_window_misuse()
192 if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR; in test_create_window_misuse()
218 Tcl_SetObjResult(interp, Tcl_NewStringObj("misuse test error", -1)); in test_create_window_misuse()
280 Tcl_Interp *interp, in test_create_sumint() argument
288 Tcl_WrongNumArgs(interp, 1, objv, "DB"); in test_create_sumint()
291 if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR; in test_create_sumint()
299 Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1)); in test_create_sumint()
307 Tcl_Interp *interp, in test_override_sum() argument
315 Tcl_WrongNumArgs(interp, 1, objv, "DB"); in test_override_sum()
318 if( getDbPointer(interp, Tcl_GetString(objv[1]), &db) ) return TCL_ERROR; in test_override_sum()
325 Tcl_SetObjResult(interp, Tcl_NewStringObj(sqlite3ErrName(rc), -1)); in test_override_sum()
331 int Sqlitetest_window_Init(Tcl_Interp *interp){ in Sqlitetest_window_Init() argument
345 Tcl_CreateObjCommand(interp, aObjCmd[i].zName, aObjCmd[i].xProc, c, 0); in Sqlitetest_window_Init()