summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorMiguel Sofer <miguel.sofer@gmail.com>2015-07-31 00:01:52 (GMT)
committerMiguel Sofer <miguel.sofer@gmail.com>2015-07-31 00:01:52 (GMT)
commitebfeba748ff271021528a24c0ccf6e6f279ba347 (patch)
tree3b64c767d556b1b82a7a697f7bdb6a330a1c2355
parent96a9d808347805b5cf8714c5d9bad555aa8da1ce (diff)
downloadtcl-ebfeba748ff271021528a24c0ccf6e6f279ba347.zip
tcl-ebfeba748ff271021528a24c0ccf6e6f279ba347.tar.gz
tcl-ebfeba748ff271021528a24c0ccf6e6f279ba347.tar.bz2
fix typo found by Coverity; no effect on "most" platforms (is there anyone where it would matter?)
-rw-r--r--generic/tclFileName.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclFileName.c b/generic/tclFileName.c
index a7251bb..39bac99 100644
--- a/generic/tclFileName.c
+++ b/generic/tclFileName.c
@@ -821,10 +821,10 @@ Tcl_FSJoinToPath(
return TclJoinPath(2, pair);
} else {
int elemc = objc + 1;
- Tcl_Obj *ret, **elemv = ckalloc(elemc*sizeof(Tcl_Obj **));
+ Tcl_Obj *ret, **elemv = ckalloc(elemc*sizeof(Tcl_Obj *));
elemv[0] = pathPtr;
- memcpy(elemv+1, objv, objc*sizeof(Tcl_Obj **));
+ memcpy(elemv+1, objv, objc*sizeof(Tcl_Obj *));
ret = TclJoinPath(elemc, elemv);
ckfree(elemv);
return ret;