[p5sagit/p5-mst-13.2.git] / perlmem.h

#ifndef H_PERLMEM
#define H_PERLMEM 1

#ifdef PERL_OBJECT

#include "ipmem.h"

#define PerlMem_malloc(size) piMem->Malloc((size))
#define PerlMem_realloc(buf, size) piMem->Realloc((buf), (size))
#define PerlMem_free(buf) piMem->Free((buf))
#else
#define PerlMem_malloc(size) malloc((size))
#define PerlMem_realloc(buf, size) realloc((buf), (size))
#define PerlMem_free(buf) free((buf))

#endif	/* PERL_OBJECT */

#endif /* Include guard */
Commit	Line	Data
3028581b	1	#ifndef H_PERLMEM
	2	#define H_PERLMEM 1
	3
	4	#ifdef PERL_OBJECT
0824fdcb	5
	6	#include "ipmem.h"
	7
	8	#define PerlMem_malloc(size) piMem->Malloc((size))
	9	#define PerlMem_realloc(buf, size) piMem->Realloc((buf), (size))
	10	#define PerlMem_free(buf) piMem->Free((buf))
3028581b	11	#else
	12	#define PerlMem_malloc(size) malloc((size))
	13	#define PerlMem_realloc(buf, size) realloc((buf), (size))
	14	#define PerlMem_free(buf) free((buf))
	15
	16	#endif /* PERL_OBJECT */
	17
	18	#endif /* Include guard */
	19