/macosx-10.10.1/tcl-105/tcl/tcl/generic/ |
H A D | tclLink.c | 71 static Tcl_Obj * ObjValue(Link *linkPtr); 77 * this macro assumes the name of the variable being accessed (linkPtr); this 82 #define LinkedVar(type) (*(type *) linkPtr->addr) 115 Link *linkPtr; 118 linkPtr = (Link *) ckalloc(sizeof(Link)); 119 linkPtr->interp = interp; 120 linkPtr->varName = Tcl_NewStringObj(varName, -1); 121 Tcl_IncrRefCount(linkPtr->varName); 122 linkPtr->addr = addr; 123 linkPtr 114 Link *linkPtr; local 168 Link *linkPtr; local 206 Link *linkPtr; local 257 Link *linkPtr = (Link *) clientData; local 558 ObjValue( Link *linkPtr) argument [all...] |
H A D | tclExecute.c | 2661 varPtr = varPtr->value.linkPtr; 2683 varPtr = varPtr->value.linkPtr; 2715 arrayPtr = arrayPtr->value.linkPtr; 2835 arrayPtr = arrayPtr->value.linkPtr; 2865 varPtr = varPtr->value.linkPtr; 2991 arrayPtr = arrayPtr->value.linkPtr; 3038 varPtr = varPtr->value.linkPtr; 3158 arrayPtr = arrayPtr->value.linkPtr; 3179 varPtr = varPtr->value.linkPtr; 3299 varPtr = varPtr->value.linkPtr; 3541 Var *linkPtr = varPtr->value.linkPtr; local [all...] |
H A D | tclVar.c | 789 varPtr = varPtr->value.linkPtr; 2459 Var *linkPtr = dummyVar.value.linkPtr; 2461 if (TclIsVarInHash(linkPtr)) { 2462 VarHashRefCount(linkPtr)--; 2463 CleanupVar(linkPtr, NULL); 3737 Var *linkPtr = varPtr->value.linkPtr; 3738 if (linkPtr == otherPtr) { 3741 if (TclIsVarInHash(linkPtr)) { 2436 Var *linkPtr = dummyVar.value.linkPtr; local 3707 Var *linkPtr = varPtr->value.linkPtr; local [all...] |
H A D | tclInt.h | 528 struct Var *linkPtr; /* If this is a global variable being referred member in union:Var::__anon12522 540 * linkPtr points here, 1 for each nested 2722 Tcl_DString *linkPtr);
|
H A D | tclProc.c | 1261 varPtr->value.linkPtr = resolvedVarPtr;
|
/macosx-10.10.1/tcl-105/tcl84/tcl/generic/ |
H A D | tclLink.c | 65 static Tcl_Obj * ObjValue _ANSI_ARGS_((Link *linkPtr)); 100 Link *linkPtr; 103 linkPtr = (Link *) ckalloc(sizeof(Link)); 104 linkPtr->interp = interp; 105 linkPtr->varName = Tcl_NewStringObj(varName, -1); 106 Tcl_IncrRefCount(linkPtr->varName); 107 linkPtr->addr = addr; 108 linkPtr->type = type & ~TCL_LINK_READ_ONLY; 110 linkPtr->flags = LINK_READ_ONLY; 112 linkPtr 99 Link *linkPtr; local 156 Link *linkPtr; local 194 Link *linkPtr; local 248 Link *linkPtr = (Link *) clientData; local [all...] |
H A D | tclVar.c | 280 varPtr = varPtr->value.linkPtr; 599 varPtr = varPtr->value.linkPtr; 2136 Var *linkPtr = varPtr->value.linkPtr; 2137 linkPtr->refCount--; 2138 if ((linkPtr->refCount == 0) && TclIsVarUndefined(linkPtr) 2139 && (linkPtr->tracePtr == NULL) 2140 && (linkPtr->flags & VAR_IN_HASHTABLE)) { 2141 if (linkPtr 2115 Var *linkPtr = varPtr->value.linkPtr; local 3652 Var *linkPtr = varPtr->value.linkPtr; local 4681 Var *linkPtr; local 4828 Var *linkPtr; local 5227 Var *linkPtr = varPtr->value.linkPtr; local [all...] |
H A D | tclExecute.c | 1739 varPtr = varPtr->value.linkPtr; 1762 varPtr = varPtr->value.linkPtr; 1833 arrayPtr = arrayPtr->value.linkPtr; 1997 arrayPtr = arrayPtr->value.linkPtr; 2052 varPtr = varPtr->value.linkPtr; 2207 arrayPtr = arrayPtr->value.linkPtr; 2230 varPtr = varPtr->value.linkPtr; 4256 varPtr = varPtr->value.linkPtr;
|
H A D | tclInt.h | 423 struct Var *linkPtr; /* If this is a global variable being member in union:Var::__anon12587 451 * additional variable whose linkPtr points 2091 Tcl_DString *linkPtr));
|
H A D | tclCompile.c | 2409 varPtr->value.linkPtr = resolvedVarPtr;
|
/macosx-10.10.1/tcl-105/tcl_ext/xotcl/xotcl/generic/ |
H A D | deleteVars.c | 330 Var *linkPtr; local 359 linkPtr = varPtr->value.linkPtr; 360 linkPtr->refCount--; 361 if ((linkPtr->refCount == 0) && TclIsVarUndefined(linkPtr) 362 && (linkPtr->tracePtr == NULL) 363 && (linkPtr->flags & VAR_IN_HASHTABLE)) { 364 if (linkPtr->hPtr == NULL) { 365 ckfree((char *) linkPtr); [all...] |
H A D | deleteVars.h | 326 Var *linkPtr; variable 356 linkPtr = varPtr->value.linkPtr; 357 linkPtr->refCount--; 358 if ((linkPtr->refCount == 0) && TclIsVarUndefined(linkPtr) 359 && (linkPtr->tracePtr == NULL) 360 && (linkPtr->flags & VAR_IN_HASHTABLE)) { 361 if (linkPtr->hPtr == NULL) { 362 ckfree((char *) linkPtr); [all...] |
H A D | xotcl.c | 248 struct Var85 *linkPtr; member in union:Var85::__anon13158 9070 Var *linkPtr = valueOfVar(Var, varPtr, linkPtr); local 9071 if (linkPtr == otherPtr) { 9075 /*fprintf(stderr, "linkvar flags=%x\n", linkPtr->flags); 9081 VarHashRefCount(linkPtr)--; 9082 if (TclIsVarUndefined(linkPtr)) { 9083 CleanupVar(linkPtr, (Var *) NULL); 9100 vPtr->value.linkPtr = (Var85 *)otherPtr; 9102 varPtr->value.linkPtr [all...] |
/macosx-10.10.1/tcl-105/tcl84/tcl/unix/ |
H A D | tclUnixFile.c | 658 TclpReadlink(path, linkPtr) 660 Tcl_DString *linkPtr; /* Uninitialized or free DString filled 677 Tcl_ExternalToUtfDString(NULL, link, length, linkPtr); 678 return Tcl_DStringValue(linkPtr); 755 Tcl_Obj* linkPtr = NULL; 774 linkPtr = Tcl_NewStringObj(Tcl_DStringValue(&ds), 777 if (linkPtr != NULL) { 778 Tcl_IncrRefCount(linkPtr); 780 return linkPtr; 745 Tcl_Obj* linkPtr = NULL; local
|
/macosx-10.10.1/tcl-105/tcl/tcl/unix/ |
H A D | tclUnixFile.c | 788 Tcl_DString *linkPtr) /* Uninitialized or free DString filled with 805 Tcl_ExternalToUtfDString(NULL, link, length, linkPtr); 806 return Tcl_DStringValue(linkPtr); 958 Tcl_Obj *linkPtr = NULL; 977 linkPtr = Tcl_NewStringObj(Tcl_DStringValue(&ds), 980 if (linkPtr != NULL) { 981 Tcl_IncrRefCount(linkPtr); 983 return linkPtr; 776 TclpReadlink( CONST char *path, Tcl_DString *linkPtr) argument 946 Tcl_Obj *linkPtr = NULL; local
|
/macosx-10.10.1/tcl-105/tcl_ext/incrtcl/incrTcl/itcl/generic/ |
H A D | itclInt.h | 199 struct Var *linkPtr; member in union:ItclShortVar::__anon12628
|
/macosx-10.10.1/tcl-105/tcl84/tcl/win/ |
H A D | tclWinFile.c | 1687 TclpReadlink(path, linkPtr) 1689 Tcl_DString *linkPtr; /* Uninitialized or free DString filled 1705 Tcl_ExternalToUtfDString(NULL, link, length, linkPtr); 1706 return Tcl_DStringValue(linkPtr);
|
/macosx-10.10.1/tcl-105/tcl/tcl/win/ |
H A D | tclWinFile.c | 1907 Tcl_DString *linkPtr) /* Uninitialized or free DString filled with 1923 Tcl_ExternalToUtfDString(NULL, link, length, linkPtr); 1924 return Tcl_DStringValue(linkPtr); 1887 TclpReadlink( const char *path, Tcl_DString *linkPtr) argument
|