diff options
| -rw-r--r-- | doc/AllowExc.3 | 2 | ||||
| -rw-r--r-- | doc/mathfunc.n | 2 | ||||
| -rw-r--r-- | generic/tclResult.c | 2 | ||||
| -rw-r--r-- | unix/tclUnixThrd.c | 4 | ||||
| -rw-r--r-- | win/coffbase.txt | 1 | ||||
| -rw-r--r-- | win/tclWinThrd.c | 4 |
6 files changed, 8 insertions, 7 deletions
diff --git a/doc/AllowExc.3 b/doc/AllowExc.3 index a7f483d..36da842 100644 --- a/doc/AllowExc.3 +++ b/doc/AllowExc.3 @@ -29,7 +29,7 @@ terminates with a completion code other than \fBTCL_OK\fR, \fBTCL_ERROR\fR or \fBTCL_RETURN\fR, then Tcl normally converts this into a \fBTCL_ERROR\fR return with an appropriate message. The particular script evaluation procedures of Tcl that act in the manner are -\fBTcl_EvalObjEx\fR, \fBTcl_EvalObjv\fR, \fBTcl_Eval\fR, \fBTcl_EvalEx\fR. +\fBTcl_EvalObjEx\fR, \fBTcl_EvalObjv\fR, \fBTcl_Eval\fR, \fBTcl_EvalEx\fR. .PP However, if \fBTcl_AllowExceptions\fR is invoked immediately before calling one of those a procedures, then arbitrary completion diff --git a/doc/mathfunc.n b/doc/mathfunc.n index dc4d94d..ca091c1 100644 --- a/doc/mathfunc.n +++ b/doc/mathfunc.n @@ -106,7 +106,7 @@ of which work solely with floating-point numbers unless otherwise noted: In addition to these predefined functions, applications may define additional functions by using \fBproc\fR (or any other method, such as \fBinterp alias\fR or \fBTcl_CreateObjCommand\fR) to define -new commands in the \fBtcl::mathfunc\fR namespace. +new commands in the \fBtcl::mathfunc\fR namespace. .SS "DETAILED DEFINITIONS" .TP \fBabs \fIarg\fR diff --git a/generic/tclResult.c b/generic/tclResult.c index 7e3375a..456a164 100644 --- a/generic/tclResult.c +++ b/generic/tclResult.c @@ -446,7 +446,7 @@ Tcl_AppendElement( if (Tcl_IsShared(iPtr->objResultPtr)) { Tcl_SetObjResult(interp, Tcl_DuplicateObj(iPtr->objResultPtr)); - } + } bytes = Tcl_GetStringFromObj(iPtr->objResultPtr, &length); if (TclNeedSpace(bytes, bytes+length)) { Tcl_AppendToObj(iPtr->objResultPtr, " ", 1); diff --git a/unix/tclUnixThrd.c b/unix/tclUnixThrd.c index 76b6b80..5030086 100644 --- a/unix/tclUnixThrd.c +++ b/unix/tclUnixThrd.c @@ -663,7 +663,7 @@ TclpInitAllocCache(void) { pthread_mutex_lock(allocLockPtr); pthread_key_create(&key, TclpFreeAllocCache); - pthread_mutex_unlock(allocLockPtr); + pthread_mutex_unlock(allocLockPtr); } void @@ -677,7 +677,7 @@ TclpFreeAllocCache( TclFreeAllocCache(ptr); pthread_setspecific(key, NULL); - + } else { pthread_key_delete(key); } diff --git a/win/coffbase.txt b/win/coffbase.txt index 0ebe18a..3314f26 100644 --- a/win/coffbase.txt +++ b/win/coffbase.txt @@ -34,6 +34,7 @@ tclsdl 0x10B20000 0x00080000 vqtcl 0x10C00000 0x00010000
tdbc 0x10C40000 0x00010000
thread 0x10C80000 0x00020000
+nsf 0x10ca0000 0x00080000
;
; insert new packages here
;
diff --git a/win/tclWinThrd.c b/win/tclWinThrd.c index 4b4f870..3d9c42b 100644 --- a/win/tclWinThrd.c +++ b/win/tclWinThrd.c @@ -972,11 +972,11 @@ TclpInitAllocCache(void) * We need to make sure that TclpFreeAllocCache is called on each * thread that calls this, but only on threads that call this. */ - + tlsKey = TlsAlloc(); if (tlsKey == TLS_OUT_OF_INDEXES) { Tcl_Panic("could not allocate thread local storage"); - } + } } void * |