diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-08 10:34:55 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-02-08 10:34:55 +0000 |
commit | 86058a2d0cb92466b4e8a316b21562a79c7559b9 (patch) | |
tree | 79fc2d8b5d8b0a111e3a74037359777afd1df976 /iperlsys.h | |
parent | a43a7b9b40bf89fadd8851b90ce97e573bb2509a (diff) | |
download | perl-86058a2d0cb92466b4e8a316b21562a79c7559b9.tar.gz |
make EMBEDMYMALLOC the default and provide PERL_POLLUTE_MALLOC to let
them ask for insanity (untested)
p4raw-id: //depot/perl@2832
Diffstat (limited to 'iperlsys.h')
-rw-r--r-- | iperlsys.h | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/iperlsys.h b/iperlsys.h index cfdc39f9de..97f30e33b4 100644 --- a/iperlsys.h +++ b/iperlsys.h @@ -610,9 +610,15 @@ public: #else /* PERL_OBJECT */ +#ifdef MYMALLOC +#define PerlMem_malloc(size) Perl_malloc((size)) +#define PerlMem_realloc(buf, size) Perl_realloc((buf), (size)) +#define PerlMem_free(buf) Perl_mfree((buf)) +#else #define PerlMem_malloc(size) malloc((size)) #define PerlMem_realloc(buf, size) realloc((buf), (size)) #define PerlMem_free(buf) free((buf)) +#endif #endif /* PERL_OBJECT */ |