diff options
author | dgp <dgp@users.sourceforge.net> | 2008-04-17 19:47:33 (GMT) |
---|---|---|
committer | dgp <dgp@users.sourceforge.net> | 2008-04-17 19:47:33 (GMT) |
commit | f57b8bc01375d237c7fb911f82af35a26197e295 (patch) | |
tree | 81d7a96620d7c450b4a4b82d7132749d84d1d1fa /generic | |
parent | 09608e5bce1452abb2255e1f859f076afea463b9 (diff) | |
download | tcl-f57b8bc01375d237c7fb911f82af35a26197e295.zip tcl-f57b8bc01375d237c7fb911f82af35a26197e295.tar.gz tcl-f57b8bc01375d237c7fb911f82af35a26197e295.tar.bz2 |
style revisions to latest commit
Diffstat (limited to 'generic')
-rw-r--r-- | generic/tclCompExpr.c | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclCompExpr.c b/generic/tclCompExpr.c index 8c66f5c..db70caf 100644 --- a/generic/tclCompExpr.c +++ b/generic/tclCompExpr.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclCompExpr.c,v 1.13.2.4 2008/04/17 19:14:20 andreas_kupries Exp $ + * RCS: @(#) $Id: tclCompExpr.c,v 1.13.2.5 2008/04/17 19:47:34 dgp Exp $ */ #include "tclInt.h" @@ -852,7 +852,7 @@ CompileMathFuncCall(exprTokenPtr, funcName, infoPtr, envPtr, endPtrPtr) code = TCL_OK; hPtr = Tcl_FindHashEntry(&iPtr->mathFuncTable, funcName); if (hPtr == NULL) { - Tcl_ResetResult(interp); + Tcl_ResetResult(interp); Tcl_AppendStringsToObj(Tcl_GetObjResult(interp), "unknown math function \"", funcName, "\"", (char *) NULL); code = TCL_ERROR; |