diff options
Diffstat (limited to 'generic')
| -rw-r--r-- | generic/tclIO.c | 4 | ||||
| -rw-r--r-- | generic/tclObj.c | 4 |
2 files changed, 4 insertions, 4 deletions
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"); } |