summaryrefslogtreecommitdiffstats
path: root/generic
diff options
context:
space:
mode:
authorjan.nijtmans <nijtmans@users.sourceforge.net>2024-04-19 13:59:33 (GMT)
committerjan.nijtmans <nijtmans@users.sourceforge.net>2024-04-19 13:59:33 (GMT)
commitc2bf5cdebdca7370e2f45131ccea9deb272923ba (patch)
tree0495e3f2ff3c39bb0cfbdbc5216388066ed24b8c /generic
parent328c86e7d4d10134601a68be137680bf53a499bc (diff)
downloadtcl-c2bf5cdebdca7370e2f45131ccea9deb272923ba.zip
tcl-c2bf5cdebdca7370e2f45131ccea9deb272923ba.tar.gz
tcl-c2bf5cdebdca7370e2f45131ccea9deb272923ba.tar.bz2
targetNamePtr -> targetCmdPtr (making it the same as in other documentation and tcl.decls)
Diffstat (limited to 'generic')
-rw-r--r--generic/tclInterp.c20
1 files changed, 10 insertions, 10 deletions
diff --git a/generic/tclInterp.c b/generic/tclInterp.c
index 9cfbab2..b0f6207 100644
--- a/generic/tclInterp.c
+++ b/generic/tclInterp.c
@@ -1264,7 +1264,7 @@ Tcl_GetAlias(
const char *aliasName, /* Name of alias to find. */
Tcl_Interp **targetInterpPtr,
/* (Return) target interpreter. */
- const char **targetNamePtr, /* (Return) name of target command. */
+ const char **targetCmdPtr, /* (Return) name of target command. */
int *argcPtr, /* (Return) count of addnl args. */
const char ***argvPtr) /* (Return) additional arguments. */
{
@@ -1288,8 +1288,8 @@ Tcl_GetAlias(
if (targetInterpPtr != NULL) {
*targetInterpPtr = aliasPtr->targetInterp;
}
- if (targetNamePtr != NULL) {
- *targetNamePtr = TclGetString(objv[0]);
+ if (targetCmdPtr != NULL) {
+ *targetCmdPtr = TclGetString(objv[0]);
}
if (argcPtr != NULL) {
*argcPtr = objc - 1;
@@ -1326,7 +1326,7 @@ Tcl_GetAliasObj(
const char *aliasName, /* Name of alias to find. */
Tcl_Interp **targetInterpPtr,
/* (Return) target interpreter. */
- const char **targetNamePtr, /* (Return) name of target command. */
+ const char **targetCmdPtr, /* (Return) name of target command. */
int *objcPtr, /* (Return) count of addnl args. */
Tcl_Obj ***objvPtr) /* (Return) additional args. */
{
@@ -1350,8 +1350,8 @@ Tcl_GetAliasObj(
if (targetInterpPtr != NULL) {
*targetInterpPtr = aliasPtr->targetInterp;
}
- if (targetNamePtr != NULL) {
- *targetNamePtr = TclGetString(objv[0]);
+ if (targetCmdPtr != NULL) {
+ *targetCmdPtr = TclGetString(objv[0]);
}
if (objcPtr != NULL) {
*objcPtr = objc - 1;
@@ -1488,7 +1488,7 @@ AliasCreate(
Tcl_Interp *parentInterp, /* Interp in which target command will be
* invoked. */
Tcl_Obj *namePtr, /* Name of alias cmd. */
- Tcl_Obj *targetNamePtr, /* Name of target cmd. */
+ Tcl_Obj *targetCmdPtr, /* Name of target cmd. */
int objc, /* Additional arguments to store */
Tcl_Obj *const objv[]) /* with alias. */
{
@@ -1508,8 +1508,8 @@ AliasCreate(
aliasPtr->objc = objc + 1;
prefv = &aliasPtr->objPtr;
- *prefv = targetNamePtr;
- Tcl_IncrRefCount(targetNamePtr);
+ *prefv = targetCmdPtr;
+ Tcl_IncrRefCount(targetCmdPtr);
for (i = 0; i < objc; i++) {
*(++prefv) = objv[i];
Tcl_IncrRefCount(objv[i]);
@@ -1540,7 +1540,7 @@ AliasCreate(
Command *cmdPtr;
Tcl_DecrRefCount(aliasPtr->token);
- Tcl_DecrRefCount(targetNamePtr);
+ Tcl_DecrRefCount(targetCmdPtr);
for (i = 0; i < objc; i++) {
Tcl_DecrRefCount(objv[i]);
}