diff options
| author | Gurusamy Sarathy <gsar@cpan.org> | 1998-01-19 04:52:18 +0000 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1998-01-19 04:52:18 +0000 |
| commit | 3028581bb6e49415e90ca9e7935ef77e075f56d6 (patch) | |
| tree | 3148ee21a20fd6a2f6d71d3109fc2ae066463314 /malloc.c | |
| parent | 377729033bd4c3e2f6c0ac6b0d2bde9a83c5da6d (diff) | |
| download | perl-3028581bb6e49415e90ca9e7935ef77e075f56d6.tar.gz | |
[win32] foo() -> PerlGroup_foo() patch from ActiveState
p4raw-id: //depot/win32/perl@433
Diffstat (limited to 'malloc.c')
| -rw-r--r-- | malloc.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -265,7 +265,7 @@ static void botch(char *s) { PerlIO_printf(PerlIO_stderr(), "assertion botched: %s\n", s); - abort(); + PerlProc_abort(); } #else #define ASSERT(p) @@ -508,7 +508,7 @@ free(void *mp) if (OV_MAGIC(ovp, bucket) != MAGIC) { static int bad_free_warn = -1; if (bad_free_warn == -1) { - char *pbf = getenv("PERL_BADFREE"); + char *pbf = PerlENV_getenv("PERL_BADFREE"); bad_free_warn = (pbf) ? atoi(pbf) : 1; } if (!bad_free_warn) |