diff options
| author | Hugo van der Sanden <hv@crypt.org> | 2002-08-23 12:23:31 +0000 |
|---|---|---|
| committer | hv <hv@crypt.org> | 2002-08-23 12:23:31 +0000 |
| commit | 1ecdd9a87cdfac3d4938733086a89d685b66dfb5 (patch) | |
| tree | a33dee174f434858c6f553ca7eaa3ccc83e71cfa /universal.c | |
| parent | ba329e04450c9e718e3584348f2d0f15c4762fb6 (diff) | |
| download | perl-1ecdd9a87cdfac3d4938733086a89d685b66dfb5.tar.gz | |
#17747 caused bad free()s with PERL_DESTRUCT by calling newXS()
with a NULL subaddr. Fix that, and stop it happening again.
p4raw-id: //depot/perl@17763
Diffstat (limited to 'universal.c')
| -rw-r--r-- | universal.c | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/universal.c b/universal.c index 668fa3b34a..4a879e9750 100644 --- a/universal.c +++ b/universal.c @@ -192,7 +192,6 @@ Perl_boot_core_UNIVERSAL(pTHX) sv_inc(sv); SvSETMAGIC(sv); /* Make it findable via fetchmethod */ - newXS("version::()", NULL, file); newXS("version::new", XS_version_new, file); newXS("version::(\"\"", XS_version_stringify, file); newXS("version::stringify", XS_version_stringify, file); |