diff options
author | Miguel Sofer <miguel.sofer@gmail.com> | 2016-01-23 20:28:19 (GMT) |
---|---|---|
committer | Miguel Sofer <miguel.sofer@gmail.com> | 2016-01-23 20:28:19 (GMT) |
commit | 1acb0742e2003b2986c75a8f0967b7a7fdd5d661 (patch) | |
tree | 17e6862de7202f1e8aa203b4d9ce71e48c3abd01 /generic/tclInterp.c | |
parent | d8bdd23bc64b9a515924bf2f8c38345a1ee46c0a (diff) | |
parent | 095b587df14e39ec71e1f4a638516f371c8ce861 (diff) | |
download | tcl-1acb0742e2003b2986c75a8f0967b7a7fdd5d661.zip tcl-1acb0742e2003b2986c75a8f0967b7a7fdd5d661.tar.gz tcl-1acb0742e2003b2986c75a8f0967b7a7fdd5d661.tar.bz2 |
merge
Diffstat (limited to 'generic/tclInterp.c')
-rw-r--r-- | generic/tclInterp.c | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/generic/tclInterp.c b/generic/tclInterp.c index 96efa8c..f285d99 100644 --- a/generic/tclInterp.c +++ b/generic/tclInterp.c @@ -1877,7 +1877,6 @@ AliasObjCmd( cmdv = TclStackAlloc(interp, cmdc * sizeof(Tcl_Obj *)); } - prefv = &aliasPtr->objPtr; memcpy(cmdv, prefv, (size_t) (prefc * sizeof(Tcl_Obj *))); memcpy(cmdv+prefc, objv+1, (size_t) ((objc-1) * sizeof(Tcl_Obj *))); |