This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
add Perl_magic_freemglob() magic vtable method
authorDavid Mitchell <davem@iabyn.com>
Mon, 19 Oct 2020 15:01:49 +0000 (16:01 +0100)
committerDavid Mitchell <davem@iabyn.com>
Fri, 23 Oct 2020 13:25:52 +0000 (14:25 +0100)
commit02a48966c3f10e905b24f9bd307fa31c05060908
tree5e53a6e6b781f76381e6e386114fc9ea60dac581
parent032a49194dbdca7f62038e1b4af134d72972ecd8
add Perl_magic_freemglob() magic vtable method

S_mg_free_struct() has a workaround to never free mg->mg_ptr for
PERL_MAGIC_regex_global.

Move this logic into a new magic vtable free method instead, so that
S_mg_free_struct() (which gets called for every type of magic) doesn't
have the overhead of checking every time for mg->mg_type ==
PERL_MAGIC_regex_global.

[ No, I don't know why PERL_MAGIC_regex_global's vtable and methods
  are suffixed mglob rather than regex_global or vice versa ]
embed.fnc
embed.h
mg.c
mg_vtable.h
proto.h
regen/mg_vtable.pl