summaryrefslogtreecommitdiff
path: root/src/w32heap.c
diff options
context:
space:
mode:
authorEli Zaretskii <eliz@gnu.org>2014-05-29 18:21:08 +0300
committerEli Zaretskii <eliz@gnu.org>2014-05-29 18:21:08 +0300
commitd2ff520ae44eaa9c21bb5c5069ff393b0b99eb60 (patch)
tree6e8104c5dfe066d08d64388d88627b90b5fd7aca /src/w32heap.c
parent035159ed54cf2e1abc0439fbb6e628c9223f8e5d (diff)
downloademacs-d2ff520ae44eaa9c21bb5c5069ff393b0b99eb60.tar.gz
Add diagnostics for using private heap on MS-Windows during dumping.
src/w32heap.c (report_temacs_memory_usage): New function. src/unexw32.c (unexec) [ENABLE_CHECKING]: Call report_temacs_memory_usage. src/w32heap.h (report_temacs_memory_usage): Add prototype.
Diffstat (limited to 'src/w32heap.c')
-rw-r--r--src/w32heap.c13
1 files changed, 13 insertions, 0 deletions
diff --git a/src/w32heap.c b/src/w32heap.c
index 7cce7c50319..be097901747 100644
--- a/src/w32heap.c
+++ b/src/w32heap.c
@@ -448,6 +448,19 @@ free_before_dump (void *ptr)
}
}
+#ifdef ENABLE_CHECKING
+void
+report_temacs_memory_usage (void)
+{
+ /* Emulate 'message', which writes to stderr in non-interactive
+ sessions. */
+ fprintf (stderr,
+ "Dump memory usage: Heap: %" PRIu64 " Large blocks(%lu): %" PRIu64 "\n",
+ (unsigned long long)committed, blocks_number,
+ (unsigned long long)(dumped_data + DUMPED_HEAP_SIZE - bc_limit));
+}
+#endif
+
/* Emulate getpagesize. */
int
getpagesize (void)