cutil/freelist.cpp

Go to the documentation of this file.

#include "freelist.h"
#include "danerror.h"
#include "callcpp.h"

#include <memory.h>

static int mem_alloc_counter = 0;

int *memalloc_p(int size) {
  mem_alloc_counter++;
  if (!size)
    DoError (0, "Allocation of 0 bytes");
  return ((int *) c_alloc_mem_p (size));
}


int *memalloc(int size) {
  mem_alloc_counter++;
  return ((int *) c_alloc_mem (size));
}


int *memrealloc(void *ptr, int size, int oldsize) {
  int shiftsize;
  int *newbuf;

  shiftsize = size > oldsize ? oldsize : size;
  newbuf = (int *) c_alloc_mem (size);
  memcpy(newbuf, ptr, shiftsize);
  c_free_mem(ptr);
  return newbuf;
}


void memfree(void *element) {
  if (element) {
    c_free_mem(element);
    mem_alloc_counter--;
  }
  else {
    cprintf ("%d MEM_ALLOC's used\n", mem_alloc_counter);
    DoError (0, "Memfree of NULL pointer");
  }
}


void mem_tidy(int level) {
  c_check_mem ("Old tidy", level);
}

---