diff options
| -rw-r--r-- | generic/tclCkalloc.c | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/generic/tclCkalloc.c b/generic/tclCkalloc.c index 5263e82..b6616cd 100644 --- a/generic/tclCkalloc.c +++ b/generic/tclCkalloc.c @@ -187,7 +187,7 @@ TclDumpMemoryInfo(ClientData clientData, int flags) maximum_malloc_packets, (unsigned long)maximum_bytes_malloced); if (flags == 0) { - fprintf((FILE *)clientData, buf); + fprintf((FILE *)clientData, "%s", buf); } else { /* Assume objPtr to append to */ Tcl_AppendToObj((Tcl_Obj *) clientData, buf, -1); |