scnc
/
quantum-espresso
mirror of https://gitlab.com/QEF/q-e.git
1
0
Fork 0
Code Issues Packages Projects Releases Wiki Activity

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
This commit is contained in:
giannozz 2006-03-28 15:39:28 +00:00
parent 3bac585738
commit 0032789b2f
1 changed files with 1 additions and 53 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

54
clib/memstat.c
View File

@ -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