From 0032789b2f23c158556c58dcc98edb550ae77a5f Mon Sep 17 00:00:00 2001
From: giannozz <giannozz@c92efa57-630b-4861-b058-cf58834340f0>
Date: Tue, 28 Mar 2006 15:39:28 +0000
Subject: [PATCH] Only the __AIX case is kept (it was the only nonobsolete
 working one)

git-svn-id: http://qeforge.qe-forge.org/svn/q-e/trunk/espresso@2972 c92efa57-630b-4861-b058-cf58834340f0
---
 clib/memstat.c | 54 +-------------------------------------------------
 1 file changed, 1 insertion(+), 53 deletions(-)

diff --git a/clib/memstat.c b/clib/memstat.c
index 530cf6196..f20c8a855 100644
--- a/clib/memstat.c
+++ b/clib/memstat.c
@@ -18,20 +18,7 @@
 
 void MEMSTAT(int *me)
 {
-#if defined __ALPHA
-  /* printf("\n   MEMORY STATISTICS FROM PE(%d) : \n",*me); */
-#endif
-#if defined __LINUX
-  printf("\n   MEMORY STATISTICS FROM PE(%d) : \n",*me);
-#endif
-#if defined __T3E
-  printf("\n   MEMORY STATISTICS FROM PE(%d) : \n",*me);
-  malloc_stats (0);
-#endif
-#if defined __SGI || defined __ORIGIN || defined __ALTIX
-  printf("\n   MEMORY STATISTICS FROM PE(%d) : \n",*me);
-  /* malloc_stats (0); */
-#endif
+  /* T3E: malloc_stats (0); */
 #if defined __AIX
   struct mallinfo info;  info = mallinfo();
   printf("\n   PE(%d) MEMORY STATISTICS ",*me);
@@ -39,42 +26,3 @@ void MEMSTAT(int *me)
 #endif
 }
 
-void print_ptr( void * ptr ) {
-  printf("\n   PRTVAL: %p", ptr );
-}
-
-#if defined __T3E
-
-void MEMORY_STATISTICS(int *me)
-{
-
-    struct mallinfo Memory;
-    Memory = mallinfo();
-
-    if((*me)==1) {
-      printf("\n\n ==========================================\n");
-      printf(" MEMORY STATISTICS\n");
-      printf(" total space in arena            %10d\n",Memory.arena);
-      printf(" number of ordinary blocks       %10d\n",Memory.ordblks);
-      printf(" number of small blocks          %10d\n",Memory.smblks);
-      printf(" number of holding blocks        %10d\n",Memory.hblks);
-      printf(" space in holding block headers  %10d\n",Memory.hblkhd);
-      printf(" space in small blocks in use    %10d\n",Memory.usmblks);
-      printf(" space in free small blocks      %10d\n",Memory.fsmblks);
-      printf(" space in ordinary blocks in use %10d\n",Memory.uordblks);
-      printf(" space in free ordinary blocks   %10d\n",Memory.fordblks);
-      printf(" cost of enabling keep option    %10d\n",Memory.keepcost);
-      printf(" ==========================================\n\n");
-    }
-
-}
-
-void FREE_MEMORY(int *free)
-{
-    static int total_memory = 16000000;
-    struct mallinfo Memory;
-    Memory = mallinfo();
-    *free = total_memory - Memory.arena/8;
-}
- 
-#endif