summaryrefslogtreecommitdiff
path: root/inline.h
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2019-09-11 20:33:05 -0600
committerKarl Williamson <khw@cpan.org>2019-09-15 10:39:56 -0600
commitbdef45de9c7826f7f2eefe93a033a3f42f25608a (patch)
tree1c5974c01f5b231385cf5b0e83e21f333dee4d79 /inline.h
parent2ac0ce0e1ab8109922cbf1cc0824d2a17da26951 (diff)
downloadperl-bdef45de9c7826f7f2eefe93a033a3f42f25608a.tar.gz
Add embed.fnc entry for ReANY
This inline function should have an entry.
Diffstat (limited to 'inline.h')
-rw-r--r--inline.h3
1 files changed, 3 insertions, 0 deletions
diff --git a/inline.h b/inline.h
index a63feedb95..c35fe9561e 100644
--- a/inline.h
+++ b/inline.h
@@ -185,7 +185,10 @@ PERL_STATIC_INLINE struct regexp *
Perl_ReANY(const REGEXP * const re)
{
XPV* const p = (XPV*)SvANY(re);
+
+ PERL_ARGS_ASSERT_REANY;
assert(isREGEXP(re));
+
return SvTYPE(re) == SVt_PVLV ? p->xpv_len_u.xpvlenu_rx
: (struct regexp *)p;
}