diff options
| author | nijtmans <nijtmans> | 2010-06-16 14:49:50 (GMT) |
|---|---|---|
| committer | nijtmans <nijtmans> | 2010-06-16 14:49:50 (GMT) |
| commit | 895f05f712393e5e7629384b1690690c6f866974 (patch) | |
| tree | 089f9fd54e012a12bd858f538ba697f61a08789e /generic/tclInt.h | |
| parent | eb98df8fef94944b7b479387e27232beab5e869d (diff) | |
| download | tcl-895f05f712393e5e7629384b1690690c6f866974.zip tcl-895f05f712393e5e7629384b1690690c6f866974.tar.gz tcl-895f05f712393e5e7629384b1690690c6f866974.tar.bz2 | |
Simplify Tcl_AppInit and *_Init definitions.
Change TclpThreadCreate and Tcl_CreateThread
signature, making clear that "proc" is a function
pointer, as in all other "proc" function parameters.
Diffstat (limited to 'generic/tclInt.h')
| -rw-r--r-- | generic/tclInt.h | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/generic/tclInt.h b/generic/tclInt.h index a03bfc2..19bde2f 100644 --- a/generic/tclInt.h +++ b/generic/tclInt.h @@ -15,7 +15,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclInt.h,v 1.477 2010/05/28 13:52:00 nijtmans Exp $ + * RCS: @(#) $Id: tclInt.h,v 1.478 2010/06/16 14:49:50 nijtmans Exp $ */ #ifndef _TCLINT @@ -2997,7 +2997,7 @@ MODULE_SCOPE void TclpFinalizeMutex(Tcl_Mutex *mutexPtr); MODULE_SCOPE void TclpFinalizePipes(void); MODULE_SCOPE void TclpFinalizeSockets(void); MODULE_SCOPE int TclpThreadCreate(Tcl_ThreadId *idPtr, - Tcl_ThreadCreateProc proc, ClientData clientData, + Tcl_ThreadCreateProc *proc, ClientData clientData, int stackSize, int flags); MODULE_SCOPE int TclpFindVariable(const char *name, int *lengthPtr); MODULE_SCOPE void TclpInitLibraryPath(char **valuePtr, @@ -4157,7 +4157,7 @@ MODULE_SCOPE void TclDbInitNewObj(Tcl_Obj *objPtr, const char *file, *---------------------------------------------------------------------- */ -MODULE_SCOPE int TclTommath_Init(Tcl_Interp *interp); +MODULE_SCOPE Tcl_PackageInitProc TclTommath_Init; MODULE_SCOPE void TclBNInitBignumFromLong(mp_int *bignum, long initVal); MODULE_SCOPE void TclBNInitBignumFromWideInt(mp_int *bignum, Tcl_WideInt initVal); @@ -4174,11 +4174,11 @@ MODULE_SCOPE void TclBNInitBignumFromWideUInt(mp_int *bignum, *---------------------------------------------------------------------- */ -MODULE_SCOPE int TclplatformtestInit(Tcl_Interp *interp); -MODULE_SCOPE int TclObjTest_Init(Tcl_Interp *interp); -MODULE_SCOPE int TclThread_Init(Tcl_Interp *interp); -MODULE_SCOPE int Procbodytest_Init(Tcl_Interp *interp); -MODULE_SCOPE int Procbodytest_SafeInit(Tcl_Interp *interp); +MODULE_SCOPE Tcl_PackageInitProc TclplatformtestInit; +MODULE_SCOPE Tcl_PackageInitProc TclObjTest_Init; +MODULE_SCOPE Tcl_PackageInitProc TclThread_Init; +MODULE_SCOPE Tcl_PackageInitProc Procbodytest_Init; +MODULE_SCOPE Tcl_PackageInitProc Procbodytest_SafeInit; /* *---------------------------------------------------------------- |