var/da/da_tracing/da_memory.c

   1 #include <stdio.h>
   2 #include <stdlib.h>
   3 #include <string.h>
   4 #include <time.h>
   5
   6 #if !(defined(MACOS) || defined(IRIX))
   7 #include <malloc.h>
   8 #endif
   9
  10 #ifdef NOUNDERSCORE
  11 void da_memory(
  12 #else
  13 #ifdef F2CSTYLE
  14 void da_memory__(
  15 #else
  16 void da_memory_(
  17 #endif
  18 #endif
  19
  20   memory_used)
  21
  22   int *memory_used;
  23 {
  24
  25 #if !(defined(vpp) || defined(vpp2) || defined(SUN) || defined(crayx1) || defined(MACOS)) || defined(IRIX)
  26 struct mallinfo result;
  27
  28 result=mallinfo();
  29 /* return memory in kbytes, both for smaller numbers, and to avoid going outside integer*4 range */
  30 *memory_used=result.uordblks/1024;
  31 #else
  32   *memory_used=0;
  33 #endif
  34 }