From 4814711c48d631ba65ddf08bde60095481b4e7a3 Mon Sep 17 00:00:00 2001 From: andreas_kupries Date: Thu, 4 Aug 2005 17:28:48 +0000 Subject: * 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. --- ChangeLog | 8 ++++++++ generic/tclIO.c | 4 ++-- generic/tclObj.c | 4 ++-- 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 + + * 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 * 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"); } -- cgit v0.12