diff options
| author | Paul Traina <pst@FreeBSD.org> | 1997-11-27 19:49:05 +0000 |
|---|---|---|
| committer | Paul Traina <pst@FreeBSD.org> | 1997-11-27 19:49:05 +0000 |
| commit | f25b19db8d50748d4f75272ae324cad27788d9b3 (patch) | |
| tree | cef0bba69f1833802f43364a0cde6945601e665a /contrib/tcl/generic/tclObj.c | |
| parent | 539e1e66ff6f99c987c8e03872ddaea5260db8f7 (diff) | |
Notes
Diffstat (limited to 'contrib/tcl/generic/tclObj.c')
| -rw-r--r-- | contrib/tcl/generic/tclObj.c | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/contrib/tcl/generic/tclObj.c b/contrib/tcl/generic/tclObj.c index bc697f391f87f..62f892c561687 100644 --- a/contrib/tcl/generic/tclObj.c +++ b/contrib/tcl/generic/tclObj.c @@ -9,7 +9,7 @@ * See the file "license.terms" for information on usage and redistribution * of this file, and for a DISCLAIMER OF ALL WARRANTIES. * - * SCCS: @(#) tclObj.c 1.45 97/07/07 18:26:00 + * SCCS: @(#) tclObj.c 1.47 97/10/30 13:39:00 */ #include "tclInt.h" @@ -2092,7 +2092,7 @@ Tcl_DbDecrRefCount(objPtr, file, line) if (objPtr->refCount == 0x61616161) { fprintf(stderr, "file = %s, line = %d\n", file, line); fflush(stderr); - panic("Trying to increment refCount of previously disposed object."); + panic("Trying to decrement refCount of previously disposed object."); } #endif if (--(objPtr)->refCount <= 0) { @@ -2134,7 +2134,7 @@ Tcl_DbIsShared(objPtr, file, line) if (objPtr->refCount == 0x61616161) { fprintf(stderr, "file = %s, line = %d\n", file, line); fflush(stderr); - panic("Trying to increment refCount of previously disposed object."); + panic("Trying to check whether previously disposed object is shared."); } #endif return ((objPtr)->refCount > 1); |