summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rw-r--r--ChangeLog8
-rw-r--r--generic/tclIO.c4
-rw-r--r--generic/tclObj.c4
3 files changed, 12 insertions, 4 deletions
diff --git a/ChangeLog b/ChangeLog
index d318dc6..1814ef9 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2005-08-04 Andreas Kupries <andreask@activestate.com>
+
+ * generic/tclIO.c (CloseChannel): Fixed comment nit, added
+ apparently missing word to complete a sentence.
+
+ * generic/tclObj.c (Tcl_DbDecrRefCount): Fixed whitespace nit in
+ panic message.
+
2005-08-04 Don Porter <dgp@users.sourceforge.net>
* generic/tclObj.c: Simplified routines that manage the typeTable.
diff --git a/generic/tclIO.c b/generic/tclIO.c
index e11f489..dcb4e9d 100644
--- a/generic/tclIO.c
+++ b/generic/tclIO.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: tclIO.c,v 1.91 2005/07/17 21:17:40 dkf Exp $
+ * RCS: @(#) $Id: tclIO.c,v 1.92 2005/08/04 17:29:01 andreas_kupries Exp $
*/
#include "tclInt.h"
@@ -2329,7 +2329,7 @@ CloseChannel(interp, chanPtr, errorCode)
* There is only the TOP Channel, so we free the remaining pointers we
* have and then ourselves. Since this is the last of the channels in the
* stack, make sure to free the ChannelState structure associated with it.
- * We use Tcl_EventuallyFree to allow for any last
+ * We use Tcl_EventuallyFree to allow for any last references.
*/
chanPtr->typePtr = NULL;
diff --git a/generic/tclObj.c b/generic/tclObj.c
index 1115b6f..3f0af61 100644
--- a/generic/tclObj.c
+++ b/generic/tclObj.c
@@ -12,7 +12,7 @@
* See the file "license.terms" for information on usage and redistribution of
* this file, and for a DISCLAIMER OF ALL WARRANTIES.
*
- * RCS: @(#) $Id: tclObj.c,v 1.91 2005/08/04 16:32:41 dgp Exp $
+ * RCS: @(#) $Id: tclObj.c,v 1.92 2005/08/04 17:29:06 andreas_kupries Exp $
*/
#include "tclInt.h"
@@ -3264,7 +3264,7 @@ Tcl_DbDecrRefCount(objPtr, file, line)
hPtr = Tcl_FindHashEntry(tablePtr, (char *) objPtr);
if (!hPtr) {
Tcl_Panic("%s%s",
- "Trying to decr ref count of",
+ "Trying to decr ref count of ",
"Tcl_Obj allocated in another thread");
}