Lines Matching refs:pEval
169 Tcl_Obj *pEval; in test_table_filter() local
173 pEval = Tcl_DuplicateObj(p->pFilterScript); in test_table_filter()
174 Tcl_IncrRefCount(pEval); in test_table_filter()
175 rc = Tcl_ListObjAppendElement(p->interp, pEval, Tcl_NewStringObj(zTbl, -1)); in test_table_filter()
177 rc = Tcl_EvalObjEx(p->interp, pEval, TCL_EVAL_GLOBAL); in test_table_filter()
186 Tcl_DecrRefCount(pEval); in test_table_filter()
509 Tcl_Obj *pEval; in test_filter_handler() local
512 pEval = Tcl_DuplicateObj(p->pFilterScript); in test_filter_handler()
513 Tcl_IncrRefCount(pEval); in test_filter_handler()
515 if( TCL_OK!=Tcl_ListObjAppendElement(0, pEval, Tcl_NewStringObj(zTab, -1)) in test_filter_handler()
516 || TCL_OK!=Tcl_EvalObjEx(interp, pEval, TCL_EVAL_GLOBAL) in test_filter_handler()
522 Tcl_DecrRefCount(pEval); in test_filter_handler()
532 Tcl_Obj *pEval; in test_conflict_handler() local
540 pEval = Tcl_DuplicateObj(p->pConflictScript); in test_conflict_handler()
541 Tcl_IncrRefCount(pEval); in test_conflict_handler()
548 Tcl_ListObjAppendElement(0, pEval, Tcl_NewStringObj("FOREIGN_KEY", -1)); in test_conflict_handler()
549 Tcl_ListObjAppendElement(0, pEval, Tcl_NewIntObj(nFk)); in test_conflict_handler()
553 Tcl_ListObjAppendElement(0, pEval, Tcl_NewStringObj( in test_conflict_handler()
560 Tcl_ListObjAppendElement(0, pEval, Tcl_NewStringObj(zTab, -1)); in test_conflict_handler()
565 Tcl_ListObjAppendElement(interp, pEval,Tcl_NewStringObj("DATA",-1)); in test_conflict_handler()
568 Tcl_ListObjAppendElement(interp, pEval,Tcl_NewStringObj("NOTFOUND",-1)); in test_conflict_handler()
571 Tcl_ListObjAppendElement(interp, pEval,Tcl_NewStringObj("CONFLICT",-1)); in test_conflict_handler()
574 Tcl_ListObjAppendElement(interp, pEval,Tcl_NewStringObj("CONSTRAINT",-1)); in test_conflict_handler()
587 Tcl_ListObjAppendElement(0, pEval, pOld); in test_conflict_handler()
599 Tcl_ListObjAppendElement(0, pEval, pNew); in test_conflict_handler()
614 Tcl_ListObjAppendElement(0, pEval, pConflict); in test_conflict_handler()
666 if( TCL_OK!=Tcl_EvalObjEx(interp, pEval, TCL_EVAL_GLOBAL) ){ in test_conflict_handler()
681 Tcl_DecrRefCount(pEval); in test_conflict_handler()