/ast/src/lib/libtksh/tcl/ |
H A D | tclLink.c | 29 char *varName; /* Name of variable (must be global). This member in struct:Link 81 * The value at *addr is linked to the Tcl variable "varName", 89 Tcl_LinkVar(interp, varName, addr, type) 90 Tcl_Interp *interp; /* Interpreter in which varName exists. */ 91 char *varName; /* Name of a global variable in interp. */ 93 * to varName. */ 104 linkPtr->varName = (char *) ckalloc((unsigned) (strlen(varName) + 1)); 105 strcpy(linkPtr->varName, varName); [all...] |
H A D | tclIOCmd.c | 218 char *varName; /* Assign to this variable? */ 229 " channelId ?varName?\"", (char *) NULL); 243 varName = (char *) NULL; 245 varName = argv[2]; 259 if (varName == (char *) NULL) { 262 if (Tcl_SetVar(interp, varName, Tcl_DStringValue(&ds), 215 char *varName; /* Assign to this variable? */ local
|
/ast/src/lib/libtk/generic/ |
H A D | tkTest.c | 141 char *varName; /* Name of variable in which to log member in struct:TImageMaster 811 char *varName; 814 varName = "log"; 826 varName = argv[i+1]; 835 timPtr->varName = (char *) ckalloc((unsigned) (strlen(varName) + 1)); 836 strcpy(timPtr->varName, varName); 934 Tcl_SetVar(timPtr->interp, timPtr->varName, buffer, 982 Tcl_SetVar(instPtr->masterPtr->interp, instPtr->masterPtr->varName, buffe 805 char *varName; local [all...] |
H A D | tkScale.c | 51 char *varName; /* Name of variable (malloc'ed) or NULL. member in struct:__anon415 298 DEF_SCALE_VARIABLE, Tk_Offset(Scale, varName), TK_CONFIG_NULL_OK}, 405 scalePtr->varName = NULL; 647 if (scalePtr->varName != NULL) { 648 Tcl_UntraceVar(scalePtr->interp, scalePtr->varName, 704 if (scalePtr->varName != NULL) { 705 Tcl_UntraceVar(interp, scalePtr->varName, 721 if (scalePtr->varName != NULL) { 725 stringValue = Tcl_GetVar(interp, scalePtr->varName, TCL_GLOBAL_ONLY); 732 Tcl_TraceVar(interp, scalePtr->varName, [all...] |
H A D | tkText.c | 1513 char *arg, *pattern, *varName, *p, *startOfLine; 1529 varName = NULL; 1552 varName = argv[i]; 1803 if (varName != NULL) { 1805 if (Tcl_SetVar(interp, varName, buffer, TCL_LEAVE_ERR_MSG) 1501 char *arg, *pattern, *varName, *p, *startOfLine; local
|
/ast/src/lib/libtksh/src/ |
H A D | var.c | 863 char *Tcl_SetVar(Tcl_Interp *interp, char *varName, char *newValue, int flags) argument 865 return Tcl_SetVar2(interp, varName, NULL, newValue, 868 char *Tcl_GetVar(Tcl_Interp *interp, char *varName, int flags) argument 870 return Tcl_GetVar2(interp, varName, NULL, flags | PART1_NOT_PARSED); 872 int Tcl_TraceVar(Tcl_Interp * interp, char *varName, int flags, argument 875 return Tcl_TraceVar2(interp,varName,NULL,flags|PART1_NOT_PARSED, 878 int Tcl_UnsetVar(Tcl_Interp *interp, char *varName, int flags) argument 880 return Tcl_UnsetVar2(interp,varName,NULL,flags|PART1_NOT_PARSED); 882 void Tcl_UntraceVar(Tcl_Interp * interp, char *varName, int flags, argument 885 Tcl_UntraceVar2(interp,varName,NUL 888 Tcl_VarTraceInfo(Tcl_Interp *interp, char *varName, int flags, Tcl_VarTraceProc *proc, ClientData prevClientData) argument [all...] |