diff options
author | Miguel Sofer <miguel.sofer@gmail.com> | 2015-07-31 00:01:52 (GMT) |
---|---|---|
committer | Miguel Sofer <miguel.sofer@gmail.com> | 2015-07-31 00:01:52 (GMT) |
commit | ebfeba748ff271021528a24c0ccf6e6f279ba347 (patch) | |
tree | 3b64c767d556b1b82a7a697f7bdb6a330a1c2355 /generic | |
parent | 96a9d808347805b5cf8714c5d9bad555aa8da1ce (diff) | |
download | tcl-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?)
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclFileName.c | 4 |
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; |