summaryrefslogtreecommitdiffstats
path: root/generic/tclProc.c
diff options
context:
space:
mode:
authornijtmans <nijtmans@noemail.net>2010-02-05 10:03:23 (GMT)
committernijtmans <nijtmans@noemail.net>2010-02-05 10:03:23 (GMT)
commit8056c8844c4dbffe7b4e8cafac1bccda02e5ab77 (patch)
tree91a0d32c754b6aff65afda82a01486cdc41c00d3 /generic/tclProc.c
parent619b892f3f151e41d54d71e2511827f90a1ee2d8 (diff)
downloadtcl-8056c8844c4dbffe7b4e8cafac1bccda02e5ab77.zip
tcl-8056c8844c4dbffe7b4e8cafac1bccda02e5ab77.tar.gz
tcl-8056c8844c4dbffe7b4e8cafac1bccda02e5ab77.tar.bz2
Follow-up to [2010-01-29] commit:
prevent space within stub table function parameters if the parameter type is a pointer. Minor formatting, and VOID -> void. Change signature of TclNRInterpProcCore, and TclOONewProc(Instance|)MethodEx, indicating that errorProc is a function pointer tclVar.c: fixed two gcc warnings FossilOrigin-Name: 98e1b94811e5566833ed547424b86dd3e7fc9a2d
Diffstat (limited to 'generic/tclProc.c')
-rw-r--r--generic/tclProc.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/tclProc.c b/generic/tclProc.c
index 806bf11..bac2c4e 100644
--- a/generic/tclProc.c
+++ b/generic/tclProc.c
@@ -12,7 +12,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclProc.c,v 1.176 2009/09/30 03:11:26 dgp Exp $
+ * RCS: @(#) $Id: tclProc.c,v 1.177 2010/02/05 10:03:23 nijtmans Exp $
*/
#include "tclInt.h"
@@ -1732,7 +1732,7 @@ TclNRInterpProcCore(
Tcl_Obj *procNameObj, /* Procedure name for error reporting. */
int skip, /* Number of initial arguments to be skipped,
* i.e., words in the "command name". */
- ProcErrorProc errorProc) /* How to convert results from the script into
+ ProcErrorProc *errorProc) /* How to convert results from the script into
* results of the overall procedure. */
{
Interp *iPtr = (Interp *) interp;