Better identify the output of TK_CHECK_ALLOCS results from tkText and…

… tkTextDisp.
tcltk · Dec 7, 2024 · f400994 · f400994
1 parent a54d54a
commit f400994
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/generic/tkText.c b/generic/tkText.c
@@ -644,7 +644,7 @@ AllocStatistic(void)
     }
 
     fprintf(stderr, "---------------------------------\n");
-    fprintf(stderr, "ALLOCATION:        new    destroy\n");
+    fprintf(stderr, "tkText ALLOCS:     new    destroy\n");
     fprintf(stderr, "---------------------------------\n");
     fprintf(stderr, "Shared:       %8u - %8u\n", tkTextCountNewShared, tkTextCountDestroyShared);
     fprintf(stderr, "Peer:         %8u - %8u\n", tkTextCountNewPeer, tkTextCountDestroyPeer);
@@ -4605,7 +4605,7 @@ ProcessDestroyNotify(
     textPtr->flags |= DESTROYED;
 
     /*
-     * Call 'DestroyTest' to handle the deletion for us. The actual
+     * Call 'DestroyText' to handle the deletion for us. The actual
      * textPtr may still exist after this, if there are some outstanding
      * references. But we have flagged it as DESTROYED just above, so
      * nothing will try to make use of it very extensively.

diff --git a/generic/tkTextDisp.c b/generic/tkTextDisp.c
@@ -910,7 +910,7 @@ AllocStatistic(void)
     }
 
     fprintf(stderr, "--------------------------------\n");
-    fprintf(stderr, "ALLOCATION:       new    destroy\n");
+    fprintf(stderr, "tkTextDisp ALLOCS:new    destroy\n");
     fprintf(stderr, "--------------------------------\n");
     fprintf(stderr, "DLine:       %8u - %8u\n", tkTextCountNewDLine, tkTextCountDestroyDLine);
     fprintf(stderr, "Chunk:       %8u - %8u\n", tkTextCountNewChunk, tkTextCountDestroyChunk);