• Home
  • History
  • Annotate
  • Raw
  • Download
  • only in /macosx-10.10.1/tcl-105/tcl/tcl/generic/

Lines Matching refs:arrayPtr

2653 	Var *varPtr, *arrayPtr;
2675 arrayPtr = NULL;
2697 arrayPtr = NULL;
2713 arrayPtr = &(compiledLocals[opnd]);
2714 while (TclIsVarLink(arrayPtr)) {
2715 arrayPtr = arrayPtr->value.linkPtr;
2718 if (TclIsVarArray(arrayPtr) && !ReadTraced(arrayPtr)) {
2719 varPtr = VarHashFindVar(arrayPtr->value.tablePtr, part2Ptr);
2731 TCL_LEAVE_ERR_MSG, "read", 0, 1, arrayPtr, opnd);
2759 &arrayPtr);
2761 if (TclIsVarDirectReadable2(varPtr, arrayPtr)) {
2786 objResultPtr = TclPtrGetVar(interp, varPtr, arrayPtr,
2816 Var *varPtr, *arrayPtr;
2831 arrayPtr = &(compiledLocals[opnd]);
2834 while (TclIsVarLink(arrayPtr)) {
2835 arrayPtr = arrayPtr->value.linkPtr;
2837 if (TclIsVarArray(arrayPtr) && !WriteTraced(arrayPtr)) {
2838 varPtr = VarHashFindVar(arrayPtr->value.tablePtr, part2Ptr);
2946 "set", /*createPart1*/ 1, /*createPart2*/ 1, &arrayPtr);
2987 arrayPtr = &(compiledLocals[opnd]);
2990 while (TclIsVarLink(arrayPtr)) {
2991 arrayPtr = arrayPtr->value.linkPtr;
2998 TCL_LEAVE_ERR_MSG, "set", 1, 1, arrayPtr, opnd);
3041 arrayPtr = NULL;
3046 objResultPtr = TclPtrSetVar(interp, varPtr, arrayPtr,
3088 Var *varPtr, *arrayPtr;
3132 TCL_LEAVE_ERR_MSG, "read", 1, 1, &arrayPtr);
3155 arrayPtr = &(compiledLocals[opnd]);
3157 while (TclIsVarLink(arrayPtr)) {
3158 arrayPtr = arrayPtr->value.linkPtr;
3162 TCL_LEAVE_ERR_MSG, "read", 1, 1, arrayPtr, opnd);
3301 arrayPtr = NULL;
3307 if (TclIsVarDirectModifyable2(varPtr, arrayPtr)) {
3328 objResultPtr = TclPtrIncrObjVar(interp, varPtr, arrayPtr,
3360 Var *varPtr, *arrayPtr;
3394 arrayPtr = &(compiledLocals[opnd]);
3395 while (TclIsVarLink(arrayPtr)) {
3396 arrayPtr = arrayPtr->value.linkPtr;
3399 if (TclIsVarArray(arrayPtr) && !ReadTraced(arrayPtr)) {
3400 varPtr = VarHashFindVar(arrayPtr->value.tablePtr, part2Ptr);
3406 0, 1, arrayPtr, opnd);
3408 if (ReadTraced(varPtr) || (arrayPtr && ReadTraced(arrayPtr))) {
3410 TclObjCallVarTraces(iPtr, arrayPtr, varPtr, NULL, part2Ptr,
3415 TclCleanupVar(varPtr, arrayPtr);
3440 /*createPart1*/0, /*createPart2*/1, &arrayPtr);
3442 if (ReadTraced(varPtr) || (arrayPtr && ReadTraced(arrayPtr))) {
3444 TclObjCallVarTraces(iPtr, arrayPtr, varPtr, part1Ptr,part2Ptr,
3449 TclCleanupVar(varPtr, arrayPtr);