This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
perl_free() should use PerlMem_free()
authorGurusamy Sarathy <gsar@cpan.org>
Fri, 20 Aug 1999 22:17:41 +0000 (22:17 +0000)
committerGurusamy Sarathy <gsar@cpan.org>
Fri, 20 Aug 1999 22:17:41 +0000 (22:17 +0000)
p4raw-id: //depot/perl@4015

perl.c

diff --git a/perl.c b/perl.c
index 4313742..a5816a9 100644 (file)
--- a/perl.c
+++ b/perl.c
@@ -560,9 +560,9 @@ void
 perl_free(pTHXx)
 {
 #if defined(PERL_OBJECT)
-    Safefree(this);
+    PerlMem_free(this);
 #else
-    Safefree(aTHXx);
+    PerlMem_free(aTHXx);
 #endif
 }