diff options
author | Andy Lester <andy@petdance.com> | 2005-06-06 18:08:50 -0500 |
---|---|---|
committer | H.Merijn Brand <h.m.brand@xs4all.nl> | 2005-06-07 08:18:59 +0000 |
commit | 862a34c634844bb3ea22e5f44bdaf2e973831a89 (patch) | |
tree | 77292e7d3d639e71bc2aca9df160653ecea15005 /pp_ctl.c | |
parent | c158a4fd68e274329d9ffd7198cb9eb1b21b0dfe (diff) | |
download | perl-862a34c634844bb3ea22e5f44bdaf2e973831a89.tar.gz |
Unvoid SvUPGRADE
Message-ID: <20050607040850.GA7033@petdance.com>
p4raw-id: //depot/perl@24717
Diffstat (limited to 'pp_ctl.c')
-rw-r--r-- | pp_ctl.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -285,7 +285,7 @@ PP(pp_substcont) MAGIC *mg; I32 i; if (SvTYPE(sv) < SVt_PVMG) - (void)SvUPGRADE(sv, SVt_PVMG); + SvUPGRADE(sv, SVt_PVMG); if (!(mg = mg_find(sv, PERL_MAGIC_regex_global))) { sv_magic(sv, Nullsv, PERL_MAGIC_regex_global, Nullch, 0); mg = mg_find(sv, PERL_MAGIC_regex_global); |