source: git/Singular/mminit.cc @ 6f1610

/****************************************
*  Computer Algebra System SINGULAR     *
****************************************/
/* $Id: mminit.cc,v 1.18 1999-11-17 12:09:27 obachman Exp $ */
/*
* ABSTRACT: init of memory management
*/

#define _POSIX_SOURCE 1

#include <stdlib.h>
#include <string.h>
#define __USE_MISC
#include <unistd.h>
#ifdef macintosh
#include <types.h>
#else
#include <sys/types.h>
#endif
#include "mod2.h"
#include "mmemory.h"
#include "mmprivate.h"
extern "C" { /* begin of "C" */
#include <gmp.h>
memHeap mm_specHeap = NULL;
} /* end of "C" */

void* operator new ( size_t size )
{
#ifdef MDEBUG
  extern int mm_no_mtrack;
  void* addr;
  mm_no_mtrack = 1;
  addr = mmDBAlloc( size, "new",0);
  mm_no_mtrack = 0;
  return addr;
#else
  return AllocL( size );
#endif
}

void operator delete ( void* block )
{
#ifdef MDEBUG
  mmDBFree( block, "delete",0);
#else
  FreeL( block );
#endif
}

#ifdef MDEBUG
void * mgAllocBlock( size_t t)
{
  return mmDBAllocBlock(t,"gmp",0);
}
void mgFreeBlock( void* a, size_t t)
{
  mmDBFreeBlock(a,t,"gmp",0);
}
void * mgReallocBlock( void* a, size_t t1, size_t t2)
{
  return mmDBReallocBlock(a,t1,t2,"gmp",0);
}
#endif

#ifdef HAVE_SBRK
#include <unistd.h>
unsigned long mm_SbrkInit = (unsigned long)sbrk(0);
#endif

static int mmIsInitialized=mmInit();

int mmInit( void )
{
  if(mmIsInitialized==0)
  {
#ifndef MDEBUG
    mp_set_memory_functions(mmAllocBlock,mmReallocBlock,mmFreeBlock);
#else
    mp_set_memory_functions(mgAllocBlock,mgReallocBlock,mgFreeBlock);
#endif
  }
  mmIsInitialized=1;
  return 1;
}