You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
61 lines
1.4 KiB
61 lines
1.4 KiB
#ifndef _MEMORY_H
|
|
#define _MEMORY_H
|
|
|
|
#include <stddef.h>
|
|
|
|
#define TMALLOC(t,n) (t*) tmalloc(sizeof(t) * (size_t)(n))
|
|
#define TREALLOC(t,p,n) (t*) trealloc(p, sizeof(t) * (size_t)(n))
|
|
|
|
#ifndef HAVE_LIBGC
|
|
extern void *tmalloc(size_t num);
|
|
extern void *trealloc(void *str, size_t num);
|
|
extern void txfree(void *ptr);
|
|
|
|
#define tfree(x) (txfree(x), (x) = 0)
|
|
|
|
#else
|
|
#include <gc/gc.h>
|
|
|
|
#define tmalloc(m) GC_malloc(m)
|
|
#define trealloc(m,n) GC_realloc((m),(n))
|
|
#define tfree(m)
|
|
#define txfree(m)
|
|
#endif
|
|
|
|
|
|
#include "../misc/stringutil.h" /* va: spice3 internally bzero */
|
|
|
|
#define alloc(TYPE) TMALLOC(TYPE, 1)
|
|
#define MALLOC(x) tmalloc((size_t)(x))
|
|
#define FREE(x) {if(x) { txfree(x); (x) = 0; }}
|
|
#define REALLOC(x,y) trealloc(x, (size_t)(y))
|
|
#define ZERO(PTR,TYPE) bzero(PTR, sizeof(TYPE))
|
|
|
|
|
|
#if defined(_MSC_VER) || defined(__MINGW32__)
|
|
void * hrealloc(void *ptr, size_t num);
|
|
#endif
|
|
|
|
|
|
#ifdef CIDER
|
|
|
|
#define RALLOC(ptr,type,number) \
|
|
if ((number) && (ptr = (type *)calloc((size_t)(number), sizeof(type))) == NULL) { \
|
|
return(E_NOMEM); \
|
|
}
|
|
|
|
#define XALLOC(ptr,type,number) \
|
|
if ((number) && (ptr = (type *)calloc((size_t)(number), sizeof(type))) == NULL) { \
|
|
SPfrontEnd->IFerror( E_PANIC, "Out of Memory", NIL(IFuid) ); \
|
|
exit( 1 ); \
|
|
}
|
|
|
|
#define XCALLOC(ptr,type,number) \
|
|
if ((number) && (ptr = (type *)calloc((size_t)(number), sizeof(type))) == NULL) { \
|
|
fprintf( stderr, "Out of Memory\n" ); \
|
|
exit( 1 ); \
|
|
}
|
|
|
|
#endif /* CIDER */
|
|
|
|
#endif
|