diff options
| author | ferrieux <ferrieux@users.sourceforge.net> | 2010-11-08 09:02:50 (GMT) |
|---|---|---|
| committer | ferrieux <ferrieux@users.sourceforge.net> | 2010-11-08 09:02:50 (GMT) |
| commit | 286f3f218b1644b152d724ce7b9d6ec705af63cb (patch) | |
| tree | 0d85644ab0b27650e95403c9a3435db449427f06 /generic/tclCkalloc.c | |
| parent | e8945bc3ab7e5f51e187a385f245fad11381fb12 (diff) | |
| download | tcl-286f3f218b1644b152d724ce7b9d6ec705af63cb.zip tcl-286f3f218b1644b152d724ce7b9d6ec705af63cb.tar.gz tcl-286f3f218b1644b152d724ce7b9d6ec705af63cb.tar.bz2 | |
Add missing 'objs' verb in error message.
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: */ |