Searched refs:varPtr (Results 1 - 25 of 34) sorted by relevance

12

/macosx-10.10/tcl-105/tcl_ext/incrtcl/incrTcl/itcl/generic/
H A Ditcl_migrate.c129 Var *varPtr;
131 varPtr = (Var *) ckalloc(itclVarLocalSize);
132 ItclInitVarFlags(varPtr);
133 ItclVarObjValue(varPtr) = NULL;
136 varPtr->name = NULL;
137 varPtr->nsPtr = NULL;
138 varPtr->hPtr = NULL;
139 varPtr->refCount = 0;
140 varPtr->tracePtr = NULL;
141 varPtr
127 Var *varPtr; local
158 Var *varPtr = _TclNewVar(); local
[all...]
H A DitclInt.h126 #define ItclInitVarFlags(varPtr) \
127 (varPtr)->flags = 0
129 #define ItclInitVarArgument(varPtr) \
130 (varPtr)->flags = VAR_ARGUMENT
135 #define ItclVarRefCount(varPtr) VarHashRefCount(varPtr)
137 #define ItclClearVarUndefined(varPtr)
139 #define ItclNextLocal(varPtr) ((varPtr)++)
141 #define ItclVarObjValue(varPtr) ((varPt
[all...]
H A Ditcl_objects.c1083 Var *varPtr;
1088 varPtr = _TclNewVar();
1091 varPtr->name = vdefn->member->name;
1092 varPtr->nsPtr = (Namespace*)vdefn->member->classDefn->namesp;
1105 varPtr->hPtr = (Tcl_HashEntry*)0x1;
1106 ItclVarRefCount(varPtr) = 1; /* protect from being deleted */
1120 contextObj->data[vlookup->var.index] = varPtr;
1069 Var *varPtr; local
H A Ditcl_methods.c1861 Var *varPtr;
1880 varPtr = framePtr->compiledLocals;
1884 argPtr=argPtr->nextPtr, argsLeft--, ItclNextLocal(varPtr), objv++, objc--)
1905 ItclVarObjValue(varPtr) = listPtr;
1907 ItclClearVarUndefined(varPtr);
1963 ItclVarObjValue(varPtr) = listPtr;
1965 ItclClearVarUndefined(varPtr);
2003 ItclVarObjValue(varPtr) = listPtr;
2005 ItclClearVarUndefined(varPtr);
2009 ItclVarObjValue(varPtr)
1838 Var *varPtr; local
[all...]
H A Ditcl_parse.c910 Var *varPtr;
948 varPtr = ItclVarHashCreateVar(&nsPtr->varTable,
953 varPtr->nsPtr = nsPtr;
956 TclSetVarNamespaceVar(varPtr);
957 ItclVarRefCount(varPtr)++; /* another use by class */
900 Var *varPtr; local
H A Ditcl_class.c499 VarInHash *varPtr;
531 varPtr = (VarInHash*)vlookup->var.common;
532 if (--ItclVarRefCount(varPtr) == 0) {
538 ckfree((char *)varPtr);
494 VarInHash *varPtr; local
/macosx-10.10/tcl-105/tcl/tcl/generic/
H A DtclTestObj.c24 * the values of Tcl object-valued variables. varPtr[i] is the i-th variable's
29 static Tcl_Obj *varPtr[NUMBER_OF_OBJECT_VARS]; variable
91 varPtr[i] = NULL;
189 if ((varPtr[varIndex] != NULL) && !Tcl_IsShared(varPtr[varIndex])) {
190 Tcl_SetBignumObj(varPtr[varIndex], &bignumValue);
214 if (Tcl_GetBignumFromObj(interp, varPtr[varIndex],
227 if (!Tcl_IsShared(varPtr[varIndex])) {
228 Tcl_SetBignumObj(varPtr[varIndex], &newValue);
242 if (Tcl_GetBignumFromObj(interp, varPtr[varInde
[all...]
H A DtclVar.c47 static inline void CleanupVar(Var *varPtr, Var *arrayPtr);
76 VarHashInvalidateEntry(Var* varPtr) { argument
77 varPtr->flags |= VAR_DEAD_HASH;
80 #define VarHashInvalidateEntry(varPtr) \
81 ((varPtr)->flags |= VAR_DEAD_HASH)
83 #define VarHashDeleteEntry(varPtr) \
84 Tcl_DeleteHashEntry(&(((VarInHash *) varPtr)->entry))
119 #define VarHashGetKey(varPtr) \
120 (((VarInHash *)(varPtr))->entry.key.objPtr)
158 Var *varPtr, in
266 Var *varPtr; local
299 CleanupVar( Var *varPtr, Var *arrayPtr) argument
326 TclCleanupVar( Var *varPtr, Var *arrayPtr) argument
398 Var *varPtr; local
519 register Var *varPtr; /* Points to the variable's in-frame Var local
883 Var *varPtr; /* Points to the Var structure returned for local
1109 Var *varPtr; local
1350 Var *varPtr, *arrayPtr; local
1390 TclPtrGetVar( Tcl_Interp *interp, register Var *varPtr, Var *arrayPtr, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, const int flags, int index) argument
1714 Var *varPtr, *arrayPtr; local
1761 TclPtrSetVar( Tcl_Interp *interp, register Var *varPtr, Var *arrayPtr, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, Tcl_Obj *newValuePtr, const int flags, int index) argument
2001 Var *varPtr, *arrayPtr; local
2040 TclPtrIncrObjVar( Tcl_Interp *interp, Var *varPtr, Var *arrayPtr, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, Tcl_Obj *incrPtr, const int flags, int index) argument
2213 Var *varPtr; local
2296 UnsetVarStruct( Var *varPtr, Var *arrayPtr, Interp *iPtr, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, int flags) argument
2545 Var *varPtr, *arrayPtr; local
2612 Var *varPtr, *arrayPtr; local
2767 Var *varPtr, *arrayPtr; local
3344 Var *varPtr, *arrayPtr; local
3638 Var *varPtr; local
3848 register Var *varPtr = (Var *) variable; local
4018 Var *varPtr, *arrayPtr; local
4282 ParseSearchId( Tcl_Interp *interp, const Var *varPtr, Tcl_Obj *varNamePtr, Tcl_Obj *handleObj) argument
4425 Var *varPtr; local
4510 register Var *varPtr; local
4562 register Var *varPtr; local
4598 DeleteArray( Interp *iPtr, Tcl_Obj *arrayNamePtr, Var *varPtr, int flags) argument
4824 register Var *varPtr = objPtr->internalRep.twoPtrValue.ptr2; local
4840 register Var *varPtr = srcPtr->internalRep.twoPtrValue.ptr2; local
5009 Var *varPtr; local
5128 Var *varPtr; local
5321 Var *varPtr; local
5465 Var *varPtr; local
5557 Var *varPtr; local
5576 Var *varPtr = VarHashGetValue(hPtr); local
[all...]
H A DtclExecute.c1744 #define ReadTraced(varPtr) ((varPtr)->flags & VAR_TRACED_READ)
1745 #define WriteTraced(varPtr) ((varPtr)->flags & VAR_TRACED_WRITE)
2653 Var *varPtr, *arrayPtr;
2659 varPtr = &(compiledLocals[opnd]);
2660 while (TclIsVarLink(varPtr)) {
2661 varPtr = varPtr->value.linkPtr;
2664 if (TclIsVarDirectReadable(varPtr)) {
2641 Var *varPtr, *arrayPtr; local
2804 Var *varPtr, *arrayPtr; local
3076 Var *varPtr, *arrayPtr; local
3348 Var *varPtr, *arrayPtr; local
3453 Var *varPtr, *otherPtr; local
6575 Var *iterVarPtr, *listVarPtr, *varPtr; local
6748 Var *varPtr; local
7015 Var *varPtr; local
7108 Var *varPtr; local
[all...]
H A DtclInt.h475 struct Var *varPtr; /* Variable that's being traced. */ member in struct:ActiveVarTrace
494 struct Var *varPtr; /* Pointer to array variable that's being member in struct:ArraySearch
663 * MODULE_SCOPE void TclSetVarScalar(Var *varPtr);
664 * MODULE_SCOPE void TclSetVarArray(Var *varPtr);
665 * MODULE_SCOPE void TclSetVarLink(Var *varPtr);
666 * MODULE_SCOPE void TclSetVarArrayElement(Var *varPtr);
667 * MODULE_SCOPE void TclSetVarUndefined(Var *varPtr);
668 * MODULE_SCOPE void TclClearVarUndefined(Var *varPtr);
671 #define TclSetVarScalar(varPtr) \
672 (varPtr)
[all...]
H A DtclTrace.c2415 Var *varPtr;
2421 * you do "info exists x" you get a varPtr and therefore trigger traces.
2422 * However, if you do "info exists x(i)", then you only get a varPtr if x
2427 varPtr = TclLookupVar(interp, varName, NULL, 0, "access",
2430 if (varPtr == NULL) {
2434 if ((varPtr->flags & VAR_TRACED_READ)
2436 TclCallVarTraces((Interp *)interp, arrayPtr, varPtr, varName, NULL,
2445 if (TclIsVarUndefined(varPtr)) {
2446 TclCleanupVar(varPtr, arrayPtr);
2450 return varPtr;
2395 Var *varPtr; local
2457 TclObjCallVarTraces( Interp *iPtr, register Var *arrayPtr, Var *varPtr, Tcl_Obj *part1Ptr, Tcl_Obj *part2Ptr, int flags, int leaveErrMsg, int index) argument
2488 TclCallVarTraces( Interp *iPtr, register Var *arrayPtr, Var *varPtr, const char *part1, const char *part2, int flags, int leaveErrMsg) argument
2831 Var *varPtr, *arrayPtr; local
2993 Var *varPtr, *arrayPtr; local
3159 Var *varPtr, *arrayPtr; local
[all...]
H A DtclProc.c1171 Var *varPtr = framePtr->compiledLocals;
1189 InitResolvedLocals(interp, codePtr, varPtr, nsPtr);
1215 Var *varPtr,
1225 * Find the localPtr corresponding to varPtr
1228 varNum = varPtr - iPtr->framePtr->compiledLocals;
1243 for (; localPtr != NULL; varPtr++, localPtr = localPtr->nextPtr) {
1244 varPtr->flags = 0;
1245 varPtr->value.objPtr = NULL;
1260 varPtr->flags = VAR_LINK;
1261 varPtr
1162 Var *varPtr = framePtr->compiledLocals; local
1202 InitResolvedLocals( Tcl_Interp *interp, ByteCode *codePtr, Var *varPtr, Namespace *nsPtr) argument
1343 Var *varPtr; local
1396 register Var *varPtr, *defPtr; local
[all...]
/macosx-10.10/tcl-105/tcl84/tcl/generic/
H A DtclTestObj.c22 * the values of Tcl object-valued variables. varPtr[i] is the i-th
27 static Tcl_Obj *varPtr[NUMBER_OF_OBJECT_VARS]; variable
96 varPtr[i] = NULL;
173 if ((varPtr[varIndex] != NULL) && !Tcl_IsShared(varPtr[varIndex])) {
174 Tcl_SetBooleanObj(varPtr[varIndex], boolValue);
178 Tcl_SetObjResult(interp, varPtr[varIndex]);
186 Tcl_SetObjResult(interp, varPtr[varIndex]);
194 if (Tcl_GetBooleanFromObj(interp, varPtr[varIndex],
198 if (!Tcl_IsShared(varPtr[varInde
[all...]
H A DtclVar.c47 Var *varPtr, CONST char *part1, CONST char *part2,
49 static void CleanupVar _ANSI_ARGS_((Var *varPtr,
53 CONST char *arrayName, Var *varPtr, int flags));
62 CONST Var *varPtr, CONST char *varName,
69 static void UnsetVarStruct _ANSI_ARGS_((Var *varPtr, Var *arrayPtr,
210 Var *varPtr;
225 varPtr = NULL;
272 varPtr = TclLookupSimpleVar(interp, part1, flags,
274 if (varPtr == NULL) {
279 while (TclIsVarLink(varPtr)) {
209 Var *varPtr; local
362 register Var *varPtr; /* Points to the variable's in-frame Var local
687 Var *varPtr; /* Points to the Var structure returned for local
927 Var *varPtr; local
1101 Var *varPtr, *arrayPtr; local
1150 Var *varPtr, *arrayPtr; local
1453 Var *varPtr, *arrayPtr; local
1508 Var *varPtr, *arrayPtr; local
1782 Var *varPtr, *arrayPtr; local
2013 Var *varPtr; local
2282 Var *varPtr, *arrayPtr; local
2396 Var *varPtr, *arrayPtr; local
2542 Var *varPtr, *arrayPtr; local
2669 Var *varPtr, *arrayPtr; local
2742 Var *varPtr, *arrayPtr; local
2936 Var *varPtr, *arrayPtr; local
3435 Var *varPtr, *arrayPtr; local
3568 Var *otherPtr, *varPtr, *arrayPtr; local
3789 register Var *varPtr = (Var *) variable; local
3941 Var *varPtr, *arrayPtr; local
4391 register Var *varPtr; local
4624 register Var *varPtr = (Var *) Tcl_GetHashValue(hPtr); local
4680 register Var *varPtr; local
4826 register Var *varPtr; local
5099 Var *varPtr; local
5222 register Var *varPtr = (Var *) objPtr->internalRep.twoPtrValue.ptr2; local
5243 register Var *varPtr = (Var *) srcPtr->internalRep.twoPtrValue.ptr2; local
[all...]
H A DtclInt.h370 struct Var *varPtr; /* Variable that's being traced. */ member in struct:ActiveVarTrace
391 struct Var *varPtr; /* Pointer to array variable that's being member in struct:ArraySearch
541 * EXTERN void TclSetVarScalar _ANSI_ARGS_((Var *varPtr));
542 * EXTERN void TclSetVarArray _ANSI_ARGS_((Var *varPtr));
543 * EXTERN void TclSetVarLink _ANSI_ARGS_((Var *varPtr));
544 * EXTERN void TclSetVarArrayElement _ANSI_ARGS_((Var *varPtr));
545 * EXTERN void TclSetVarUndefined _ANSI_ARGS_((Var *varPtr));
546 * EXTERN void TclClearVarUndefined _ANSI_ARGS_((Var *varPtr));
549 #define TclSetVarScalar(varPtr) \
550 (varPtr)
[all...]
H A DtclExecute.c1214 Var *varPtr, *arrayPtr;
1736 varPtr = &(varFramePtr->compiledLocals[opnd]);
1737 part1 = varPtr->name;
1738 while (TclIsVarLink(varPtr)) {
1739 varPtr = varPtr->value.linkPtr;
1742 if (TclIsVarScalar(varPtr) && !TclIsVarUndefined(varPtr)
1743 && (varPtr->tracePtr == NULL)) {
1747 objResultPtr = varPtr
1204 Var *varPtr, *arrayPtr; local
[all...]
H A DtclCmdIL.c1032 Var *varPtr;
1040 varPtr = TclVarTraceExists(interp, varName);
1041 if ((varPtr != NULL) && !TclIsVarUndefined(varPtr)) {
1382 Var *varPtr;
1411 varPtr = (Var *) Tcl_GetHashValue(entryPtr);
1412 if (!TclIsVarUndefined(varPtr)) {
1421 varPtr = (Var *) Tcl_GetHashValue(entryPtr);
1422 if (TclIsVarUndefined(varPtr)) {
1732 Var *varPtr;
1022 Var *varPtr; local
1369 Var *varPtr; local
1713 Var *varPtr; local
2203 Var *varPtr; local
[all...]
H A DtclCompile.c2339 Var *varPtr = framePtr->compiledLocals;
2401 varPtr->name = localPtr->name; /* will be just '\0' if temp var */
2402 varPtr->nsPtr = NULL;
2403 varPtr->hPtr = NULL;
2404 varPtr->refCount = 0;
2405 varPtr->tracePtr = NULL;
2406 varPtr->searchPtr = NULL;
2407 varPtr->flags = 0;
2408 TclSetVarLink(varPtr);
2409 varPtr
2323 Var *varPtr = framePtr->compiledLocals; local
[all...]
H A DtclProc.c1020 register Var *varPtr;
1103 varPtr = framePtr->compiledLocals;
1126 varPtr->value.objPtr = listPtr;
1128 TclClearVarUndefined(varPtr);
1133 varPtr->value.objPtr = objPtr;
1134 TclClearVarUndefined(varPtr);
1139 varPtr->value.objPtr = objPtr;
1140 TclClearVarUndefined(varPtr);
1146 varPtr++;
1012 register Var *varPtr; local
H A DtclNamesp.c2147 Var *varPtr;
2207 varPtr = NULL;
2208 for (search = 0; (search < 2) && (varPtr == NULL); search++) {
2213 varPtr = (Var *) Tcl_GetHashValue(entryPtr);
2217 if (varPtr != NULL) {
2218 return (Tcl_Var) varPtr;
2127 Var *varPtr; local
/macosx-10.10/tcl-105/tcl_ext/xotcl/xotcl/generic/
H A DdeleteVars.c41 CallVarTraces(iPtr, arrayPtr, varPtr, part1, part2, flags, leaveErrMsg)
46 Var *varPtr; /* Variable whose traces are to be
74 if (varPtr->flags & VAR_TRACE_ACTIVE) {
77 varPtr->flags |= VAR_TRACE_ACTIVE;
78 varPtr->refCount++;
126 active.varPtr = arrayPtr;
162 active.varPtr = varPtr;
163 for (tracePtr = varPtr->tracePtr; tracePtr != NULL;
232 varPtr
329 register Var *varPtr; local
[all...]
H A DdeleteVars.h39 CallVarTraces(iPtr, arrayPtr, varPtr, part1, part2, flags, leaveErrMsg)
44 Var *varPtr; /* Variable whose traces are to be variable
72 if (varPtr->flags & VAR_TRACE_ACTIVE) {
75 varPtr->flags |= VAR_TRACE_ACTIVE;
76 varPtr->refCount++;
124 active.varPtr = arrayPtr;
160 active.varPtr = varPtr;
161 for (tracePtr = varPtr->tracePtr; tracePtr != NULL;
230 varPtr
254 Var *varPtr; /* Pointer to variable structure. */ variable
266 DeleteSearches(varPtr); variable
325 register Var *varPtr; variable
413 TclSetVarUndefined(varPtr); variable
414 TclSetVarScalar(varPtr); variable
[all...]
H A Dxotcl.c228 (Var * varPtr, Var *arrayPtr)
306 # define VarHashRefCount(varPtr) \
307 (*((int *) (((char *)(varPtr))+varRefCountOffset)))
315 #define VarHashGetKey(varPtr) \
316 (((VarInHash *)(varPtr))->entry.key.objPtr)
330 #define varFlags(varPtr) \
332 ((Var85 *)varPtr)->flags : \
333 (varPtr)->flags \
336 #define TclIsVarScalar(varPtr) \
338 !(((Var85 *)varPtr)
428 register Var *varPtr; local
446 Var *varPtr; local
467 TclCleanupVar84(Var * varPtr, Var *arrayPtr) argument
490 Var *varPtr = NULL; local
579 Var *varPtr = NULL; local
592 Var *varPtr = NULL; local
1666 Var *varPtr; local
1692 varResolver(Tcl_Interp *interp, CONST char *name, Tcl_Namespace *ns, int flags, Tcl_Var *varPtr) argument
1897 Var *varPtr, *arrayPtr; local
4913 Var *varPtr, *arrayPtr; local
7312 Tcl_Var *varPtr; local
8974 Var *varPtr = NULL, *otherPtr = NULL, *arrayPtr; local
12082 Var *varPtr = NULL; local
12332 Var *varPtr; local
12639 Var *varPtr; local
[all...]
/macosx-10.10/tcl-105/tcl_ext/tclvfs/tclvfs/library/
H A Dtarvfs.tcl238 proc vfs::tar::_data {fd arr {varPtr ""}} {
241 if {$varPtr eq ""} {
244 upvar 1 $varPtr data
/macosx-10.10/IOFWDVComponents-207.4.1/
H A DDVLib.h195 extern UInt8 * DVWriteGetDCLBuffer(DVGlobalOutPtr globs, DVSharedVars **varPtr);

Completed in 213 milliseconds

12