diff options
| author | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-10-04 10:10:58 (GMT) |
|---|---|---|
| committer | jan.nijtmans <nijtmans@users.sourceforge.net> | 2015-10-04 10:10:58 (GMT) |
| commit | 5cfe99ddfef51d700eee80c9f766fab9c458038e (patch) | |
| tree | f6c4f80405ef3ebc4592a31b77060bd6b7cdae8c /generic/tclHistory.c | |
| parent | 03a3a2d78e1c26683170d32685d3f4d3b9ed902d (diff) | |
| download | tcl-5cfe99ddfef51d700eee80c9f766fab9c458038e.zip tcl-5cfe99ddfef51d700eee80c9f766fab9c458038e.tar.gz tcl-5cfe99ddfef51d700eee80c9f766fab9c458038e.tar.bz2 | |
Eliminate unnessessary end-of-line spacing. No functional change.
Diffstat (limited to 'generic/tclHistory.c')
| -rw-r--r-- | generic/tclHistory.c | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/generic/tclHistory.c b/generic/tclHistory.c index a23e102..97cbdcd 100644 --- a/generic/tclHistory.c +++ b/generic/tclHistory.c @@ -129,22 +129,22 @@ Tcl_RecordAndEvalObj( if (call) { /* - * Do recording by eval'ing a tcl history command: history add $cmd. + * Do recording by eval'ing a tcl history command: history add $cmd. */ TclNewLiteralStringObj(list[0], "history"); TclNewLiteralStringObj(list[1], "add"); list[2] = cmdPtr; - + objPtr = Tcl_NewListObj(3, list); Tcl_IncrRefCount(objPtr); (void) Tcl_EvalObjEx(interp, objPtr, TCL_EVAL_GLOBAL); Tcl_DecrRefCount(objPtr); - + /* * One possible failure mode above: exceeding a resource limit. */ - + if (Tcl_LimitExceeded(interp)) { return TCL_ERROR; } |