diff options
author | Karl Williamson <khw@cpan.org> | 2019-09-11 20:33:05 -0600 |
---|---|---|
committer | Karl Williamson <khw@cpan.org> | 2019-09-15 10:39:56 -0600 |
commit | bdef45de9c7826f7f2eefe93a033a3f42f25608a (patch) | |
tree | 1c5974c01f5b231385cf5b0e83e21f333dee4d79 /inline.h | |
parent | 2ac0ce0e1ab8109922cbf1cc0824d2a17da26951 (diff) | |
download | perl-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.h | 3 |
1 files changed, 3 insertions, 0 deletions
@@ -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; } |