Cross Reference: /ast/src/lib/libtksh/tcl/tclInterp.c

Lines Matching defs: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;