diff options
| author | dkf <donal.k.fellows@manchester.ac.uk> | 2008-05-31 19:56:03 (GMT) |
|---|---|---|
| committer | dkf <donal.k.fellows@manchester.ac.uk> | 2008-05-31 19:56:03 (GMT) |
| commit | d4816fa0c5eb1cea8d0e924c3187887e2c96cd11 (patch) | |
| tree | f7c861333e5590715bf0058fbc67e0c41958fd09 /generic | |
| parent | 5b6e0993e188fd16bbb2ec7f54b8b0c7be873629 (diff) | |
| download | tcl-d4816fa0c5eb1cea8d0e924c3187887e2c96cd11.zip tcl-d4816fa0c5eb1cea8d0e924c3187887e2c96cd11.tar.gz tcl-d4816fa0c5eb1cea8d0e924c3187887e2c96cd11.tar.bz2 | |
Make things build (cleanly) on Win32. Thanks to Joe Mistachkin. [Patch 1980861]
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclBasic.c | 3 | ||||
| -rw-r--r-- | generic/tclOOInt.h | 8 |
2 files changed, 6 insertions, 5 deletions
diff --git a/generic/tclBasic.c b/generic/tclBasic.c index 0a45567..57fefe2 100644 --- a/generic/tclBasic.c +++ b/generic/tclBasic.c @@ -14,10 +14,11 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclBasic.c,v 1.299 2008/05/31 11:42:13 dkf Exp $ + * RCS: @(#) $Id: tclBasic.c,v 1.300 2008/05/31 19:56:06 dkf Exp $ */ #include "tclInt.h" +#include "tclOOInt.h" #include "tclCompile.h" #include <float.h> #include <limits.h> diff --git a/generic/tclOOInt.h b/generic/tclOOInt.h index 7c0b6a7..580ea13 100644 --- a/generic/tclOOInt.h +++ b/generic/tclOOInt.h @@ -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: tclOOInt.h,v 1.1 2008/05/31 11:42:18 dkf Exp $ + * RCS: @(#) $Id: tclOOInt.h,v 1.2 2008/05/31 19:56:07 dkf Exp $ */ #include <tclInt.h> @@ -493,9 +493,9 @@ MODULE_SCOPE int TclOOGetSortedMethodList(Object *oPtr, int flags, const char ***stringsPtr); MODULE_SCOPE int TclOOInit(Tcl_Interp *interp); MODULE_SCOPE void TclOOInitInfo(Tcl_Interp *interp); -MODULE_SCOPE int TclOOInvokeContext(Tcl_Interp *interp, - CallContext *contextPtr, int objc, - Tcl_Obj *const *objv); +MODULE_SCOPE int TclOOInvokeContext(Tcl_Interp *const interp, + CallContext *const contextPtr, int const objc, + Tcl_Obj *const *const objv); MODULE_SCOPE void TclOONewBasicMethod(Tcl_Interp *interp, Class *clsPtr, const DeclaredClassMethod *dcm); MODULE_SCOPE Tcl_Obj * TclOOObjectName(Tcl_Interp *interp, Object *oPtr); |