diff options
| author | andreas_kupries <akupries@shaw.ca> | 2005-09-02 19:23:46 (GMT) |
|---|---|---|
| committer | andreas_kupries <akupries@shaw.ca> | 2005-09-02 19:23:46 (GMT) |
| commit | b815af54ad0bf8718cfb7884757a5319462f928f (patch) | |
| tree | a5dae4b20c88e9ac80c264ac19cc8c8217a51ab1 /generic | |
| parent | c49e462945bb21e0385119bf3e76707c6adc62b2 (diff) | |
| download | tcl-b815af54ad0bf8718cfb7884757a5319462f928f.zip tcl-b815af54ad0bf8718cfb7884757a5319462f928f.tar.gz tcl-b815af54ad0bf8718cfb7884757a5319462f928f.tar.bz2 | |
* unix/tclUnixSock.c (InitializeHostName): Synchronized use of
static modifier in declaration and definition of function.
* unix/tclUnixChan.c (FileTruncateProc): Synchronized use of
static modifier in declaration and definition of function.
* generic/tclResult.c (ReleaseKeys): Synchronized use of static
modifier in declaration and definition of function.
* generic/tclListObj.c (NewListIntRep): Synchronized use of static
modifier in declaration and definition of function.
* generic/tclEncoding.c (InitializeEncodingSearchPath):
Synchronized use of static modifier in declaration and
definition of function.
* generic/tclEncoding.c (FillEncodingFileMap): Synchronized use of
static modifier in declaration and definition of function.
* generic/tclIORChan.c (RcNewHandle): Synchronized use of static
modifier in declaration and definition of function.
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclEncoding.c | 6 | ||||
| -rw-r--r-- | generic/tclIORChan.c | 4 | ||||
| -rw-r--r-- | generic/tclListObj.c | 4 | ||||
| -rw-r--r-- | generic/tclResult.c | 4 |
4 files changed, 9 insertions, 9 deletions
diff --git a/generic/tclEncoding.c b/generic/tclEncoding.c index 8108771..8d2d1fd 100644 --- a/generic/tclEncoding.c +++ b/generic/tclEncoding.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclEncoding.c,v 1.36 2005/07/17 21:17:40 dkf Exp $ + * RCS: @(#) $Id: tclEncoding.c,v 1.37 2005/09/02 19:23:46 andreas_kupries Exp $ */ #include "tclInt.h" @@ -467,7 +467,7 @@ TclSetLibraryPath(path) *--------------------------------------------------------------------------- */ -void +static void FillEncodingFileMap() { int i, numDirs = 0; @@ -3242,7 +3242,7 @@ unilen(src) *------------------------------------------------------------------------- */ -void +static void InitializeEncodingSearchPath(valuePtr, lengthPtr, encodingPtr) char **valuePtr; int *lengthPtr; diff --git a/generic/tclIORChan.c b/generic/tclIORChan.c index beebff4..f5d4f63 100644 --- a/generic/tclIORChan.c +++ b/generic/tclIORChan.c @@ -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: tclIORChan.c,v 1.1 2005/08/24 17:56:23 andreas_kupries Exp $ + * RCS: @(#) $Id: tclIORChan.c,v 1.2 2005/09/02 19:23:46 andreas_kupries Exp $ */ #include <tclInt.h> @@ -1949,7 +1949,7 @@ RcNew (interp, cmdpfxObj, mode, id) *---------------------------------------------------------------------- */ -Tcl_Obj* +static Tcl_Obj* RcNewHandle () { /* Count number of generated reflected channels. Used for id diff --git a/generic/tclListObj.c b/generic/tclListObj.c index 1279a05..1488ecb 100644 --- a/generic/tclListObj.c +++ b/generic/tclListObj.c @@ -10,7 +10,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclListObj.c,v 1.25 2005/08/25 21:48:41 dkf Exp $ + * RCS: @(#) $Id: tclListObj.c,v 1.26 2005/09/02 19:23:46 andreas_kupries Exp $ */ #include "tclInt.h" @@ -74,7 +74,7 @@ Tcl_ObjType tclListType = { *---------------------------------------------------------------------- */ -List* +static List* NewListIntRep(objc, objv) int objc; Tcl_Obj *CONST objv[]; diff --git a/generic/tclResult.c b/generic/tclResult.c index a575a40..1cc9028 100644 --- a/generic/tclResult.c +++ b/generic/tclResult.c @@ -8,7 +8,7 @@ * See the file "license.terms" for information on usage and redistribution of * this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * RCS: @(#) $Id: tclResult.c,v 1.29 2005/07/24 22:56:43 dkf Exp $ + * RCS: @(#) $Id: tclResult.c,v 1.30 2005/09/02 19:23:46 andreas_kupries Exp $ */ #include "tclInt.h" @@ -1151,7 +1151,7 @@ GetKeys() *---------------------------------------------------------------------- */ -void +static void ReleaseKeys(clientData) ClientData clientData; { |