Lines Matching refs:aliasPtr

228     Alias *aliasPtr, *nextAliasPtr;
246 aliasPtr = (Alias *) clientData;
247 nextAliasPtr = aliasPtr;
258 aliasPtr->aliasName, "\": would create a loop",
781 Alias *aliasPtr; /* Storage for alias data. */
821 aliasPtr = (Alias *) ckalloc((unsigned) sizeof(Alias));
822 aliasPtr->aliasName = (char *) ckalloc((unsigned) strlen(aliasName)+1);
823 aliasPtr->targetName = (char *) ckalloc((unsigned) strlen(targetName)+1);
824 strcpy(aliasPtr->aliasName, aliasName);
825 strcpy(aliasPtr->targetName, targetName);
826 aliasPtr->targetInterp = masterInterp;
828 aliasPtr->argv = (char **) NULL;
829 aliasPtr->argc = argc;
830 if (aliasPtr->argc > 0) {
831 aliasPtr->argv = (char **) ckalloc((unsigned) sizeof(char *) *
832 aliasPtr->argc);
834 aliasPtr->argv[i] = (char *) ckalloc((unsigned) strlen(argv[i])+1);
835 strcpy(aliasPtr->argv[i], argv[i]);
840 (ClientData) aliasPtr) != TCL_OK) {
842 ckfree(aliasPtr->argv[i]);
844 if (aliasPtr->argv != (char **) NULL) {
845 ckfree((char *) aliasPtr->argv);
847 ckfree(aliasPtr->aliasName);
848 ckfree(aliasPtr->targetName);
849 ckfree((char *) aliasPtr);
854 aliasPtr->slaveCmd = Tcl_CreateCommand(slaveInterp, aliasName, AliasCmd,
855 (ClientData) aliasPtr, AliasCmdDeleteProc);
877 aliasPtr->aliasEntry = hPtr;
878 Tcl_SetHashValue(hPtr, (ClientData) aliasPtr);
890 targetPtr->slaveCmd = aliasPtr->slaveCmd;
901 aliasPtr->targetEntry = hPtr;
903 curInterp->result = aliasPtr->aliasName;
1007 Alias *aliasPtr; /* Structure describing alias. */
1035 aliasPtr = (Alias *) Tcl_GetHashValue(hPtr);
1036 Tcl_AppendResult(interp, aliasPtr->targetName, (char *) NULL);
1037 for (i = 0; i < aliasPtr->argc; i++) {
1038 Tcl_AppendElement(interp, aliasPtr->argv[i]);
1069 Alias *aliasPtr; /* Structure describing alias to delete. */
1093 aliasPtr = (Alias *) Tcl_GetHashValue(hPtr);
1094 aliasName = Tcl_GetCommandName(slaveInterp, aliasPtr->slaveCmd);
1201 Alias *aliasPtr; /* Data describing the alias. */
1227 aliasPtr = (Alias *) Tcl_GetHashValue(hPtr);
1228 if (aliasPtr == (Alias *) NULL) {
1231 if (Tcl_GetInterpPath(askingInterp, aliasPtr->targetInterp) == TCL_ERROR) {
1579 Alias *aliasPtr; /* Alias information. */
1648 aliasPtr = (Alias *) Tcl_GetHashValue(hPtr);
1649 Tcl_AppendElement(interp, aliasPtr->aliasName);
1828 Alias *aliasPtr; /* Describes the alias. */
1836 aliasPtr = (Alias *) clientData;
1838 result = Tcl_GetCommandInfo(aliasPtr->targetInterp, aliasPtr->targetName,
1841 Tcl_AppendResult(interp, "aliased target \"", aliasPtr->targetName,
1845 if (aliasPtr->argc <= 0) {
1849 addArgc = aliasPtr->argc;
1854 localArgv[j] = aliasPtr->argv[i];
1871 iPtr = (Interp *) aliasPtr->targetInterp;
1911 * Also: We cannot use aliasPtr any more because the alias may have
1927 * errorInfo before appending aliasPtr->interp's $errorInfo;
1979 Alias *aliasPtr; /* Alias record for alias to delete. */
1983 aliasPtr = (Alias *) clientData;
1985 targetPtr = (Target *) Tcl_GetHashValue(aliasPtr->targetEntry);
1987 Tcl_DeleteHashEntry(aliasPtr->targetEntry);
1989 ckfree((char *) aliasPtr->targetName);
1990 ckfree((char *) aliasPtr->aliasName);
1991 for (i = 0; i < aliasPtr->argc; i++) {
1992 ckfree((char *) aliasPtr->argv[i]);
1994 if (aliasPtr->argv != (char **) NULL) {
1995 ckfree((char *) aliasPtr->argv);
1998 Tcl_DeleteHashEntry(aliasPtr->aliasEntry);
2000 ckfree((char *) aliasPtr);
2082 Alias *aliasPtr;
2140 aliasPtr = (Alias *) Tcl_GetHashValue(hPtr);
2151 Tcl_GetCommandName(interp, aliasPtr->slaveCmd));
2437 Alias *aliasPtr; /* Storage for alias found. */
2452 aliasPtr = (Alias *) Tcl_GetHashValue(hPtr);
2454 *targetInterpPtr = aliasPtr->targetInterp;
2457 *targetNamePtr = aliasPtr->targetName;
2460 *argcPtr = aliasPtr->argc;
2463 *argvPtr = aliasPtr->argv;