From 43cf39657716c5384d40d28dbe491342b62374ed Mon Sep 17 00:00:00 2001
From: Martin Nilsson <mani@lysator.liu.se>
Date: Wed, 27 Nov 2002 22:14:05 +0100
Subject: [PATCH] Added pp_memory_usage

Rev: lib/modules/Debug.pmod/module.pmod:1.3
---
 lib/modules/Debug.pmod/module.pmod | 16 +++++++++++++++-
 1 file changed, 15 insertions(+), 1 deletion(-)

diff --git a/lib/modules/Debug.pmod/module.pmod b/lib/modules/Debug.pmod/module.pmod
index dd8634a96d..42c42b40d0 100644
--- a/lib/modules/Debug.pmod/module.pmod
+++ b/lib/modules/Debug.pmod/module.pmod
@@ -1,4 +1,4 @@
-// $Id: module.pmod,v 1.2 2002/11/25 01:26:08 nilsson Exp $
+// $Id: module.pmod,v 1.3 2002/11/27 21:14:05 nilsson Exp $
 
 #pike __REAL_VERSION__
 
@@ -48,6 +48,20 @@ constant locate_references = _locate_references;
 
 #if constant(_memory_usage)
 constant memory_usage = _memory_usage;
+
+//! Returns a pretty printed version of the
+//! output from @[memory_usage].
+string pp_memory_usage() {
+  string ret="             Num   Bytes\n";
+  mapping mu = memory_usage();
+  foreach( ({ "array", "callable", "callback", "frame", "mapping",
+              "multiset", "object", "program", "string" }),
+           string what) {
+    ret += sprintf("%-8s  %6d  %6d (%s)\n", what, mu["num_"+what+"s"],
+                   mu[what+"_bytes"], String.int2size(mu[what+"_bytes"]));
+  }
+  return ret;
+}
 #endif
 
 #if constant(_optimizer_debug)
-- 
GitLab