diff options
author | ferrieux <ferrieux@noemail.net> | 2010-11-08 09:02:50 (GMT) |
---|---|---|
committer | ferrieux <ferrieux@noemail.net> | 2010-11-08 09:02:50 (GMT) |
commit | 4a4520fb3549f3188434ea9add95d1222c599949 (patch) | |
tree | 0d85644ab0b27650e95403c9a3435db449427f06 /generic/tclCkalloc.c | |
parent | 49fd7c8005a1490c65eb6488eda416376ff2afce (diff) | |
download | tcl-4a4520fb3549f3188434ea9add95d1222c599949.zip tcl-4a4520fb3549f3188434ea9add95d1222c599949.tar.gz tcl-4a4520fb3549f3188434ea9add95d1222c599949.tar.bz2 |
Add missing 'objs' verb in error message.
FossilOrigin-Name: 38fe3826bfac809a92d67719a15819e9b36fe068
Diffstat (limited to 'generic/tclCkalloc.c')
-rw-r--r-- | generic/tclCkalloc.c | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/generic/tclCkalloc.c b/generic/tclCkalloc.c index 8ffdda1..872053b 100644 --- a/generic/tclCkalloc.c +++ b/generic/tclCkalloc.c @@ -14,7 +14,7 @@ * * This code contributed by Karl Lehenbauer and Mark Diekhans * - * RCS: @(#) $Id: tclCkalloc.c,v 1.39 2010/10/02 00:23:44 hobbs Exp $ + * RCS: @(#) $Id: tclCkalloc.c,v 1.40 2010/11/08 09:02:50 ferrieux Exp $ */ #include "tclInt.h" @@ -948,7 +948,7 @@ MemoryCmd( } Tcl_AppendResult(interp, "bad option \"", argv[1], - "\": should be active, break_on_malloc, info, init, onexit, " + "\": should be active, break_on_malloc, info, init, objs, onexit, " "tag, trace, trace_on_at_malloc, or validate", NULL); return TCL_ERROR; @@ -1315,5 +1315,7 @@ TclFinalizeMemorySubsystem(void) * mode: c * c-basic-offset: 4 * fill-column: 78 + * tab-width: 8 + * indent-tabs-mode: nil * End: */ |