diff options
| -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 0da5d47..5c94461 100644 --- a/generic/tclInterp.c +++ b/generic/tclInterp.c @@ -1882,7 +1882,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 *))); |