workbench/libs/reqtools/mem.c

   1 #include "filereq.h"
   2
   3 #ifndef __AROS__
   4 APTR REGARGS AllocVecPooled (APTR pool, ULONG memsize)
   5 {
   6     if (pool)
   7     {
   8         IPTR *mem;
   9
  10         memsize += sizeof(IPTR);
  11
  12         if ((mem = AllocPooled(pool, memsize)))
  13         {
  14             *mem++ = memsize;
  15         }
  16
  17         return mem;
  18     }
  19     else
  20     {
  21         return AllocVec(memsize, MEMF_PUBLIC | MEMF_CLEAR);
  22     }
  23 }
  24
  25 void REGARGS FreeVecPooled (APTR pool, APTR mem)
  26 {
  27     if (mem)
  28     {
  29         if (pool)
  30         {
  31             IPTR *imem = (IPTR *)mem;
  32             IPTR size = *--imem;
  33
  34             FreePooled(pool, imem, size);
  35         }
  36         else
  37         {
  38              FreeVec(mem);
  39         }
  40     }
  41 }
  42 #endif