summaryrefslogtreecommitdiffstats
path: root/generic/tclStrToD.c
diff options
context:
space:
mode:
authordkf <donal.k.fellows@manchester.ac.uk>2005-06-26 22:10:08 (GMT)
committerdkf <donal.k.fellows@manchester.ac.uk>2005-06-26 22:10:08 (GMT)
commitfebb81de53930f986aa208e0948c3bcf084fdfcc (patch)
treeec53185a5e25dfc527038068f0a0b7ac92ba0597 /generic/tclStrToD.c
parentedcb5a9de7e074a8e26ad94390533b8fcbb2e54c (diff)
downloadtcl-febb81de53930f986aa208e0948c3bcf084fdfcc.zip
tcl-febb81de53930f986aa208e0948c3bcf084fdfcc.tar.gz
tcl-febb81de53930f986aa208e0948c3bcf084fdfcc.tar.bz2
Add explanatory comment about static unprotected variables.
Diffstat (limited to 'generic/tclStrToD.c')
-rwxr-xr-xgeneric/tclStrToD.c8
1 files changed, 7 insertions, 1 deletions
diff --git a/generic/tclStrToD.c b/generic/tclStrToD.c
index ab18ef7..9f31841 100755
--- a/generic/tclStrToD.c
+++ b/generic/tclStrToD.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: tclStrToD.c,v 1.4 2005/05/11 15:39:50 kennykb Exp $
+ * RCS: @(#) $Id: tclStrToD.c,v 1.5 2005/06/26 22:10:08 dkf Exp $
*
*----------------------------------------------------------------------
*/
@@ -73,6 +73,12 @@ typedef unsigned int fpu_control_t __attribute__ ((__mode__ (__HI__)));
# define NAN_MASK (((Tcl_WideUInt) 1) << 51)
#endif
+/*
+ * There now follows a lot of static variables that are shared across all
+ * threads but which are not guarded by mutexes. This is OK, because they are
+ * only ever assigned _ONCE_ during Tcl's library initialization sequence.
+ */
+
/* The powers of ten that can be represented exactly as IEEE754 doubles. */
#define MAXPOW 22