diff options
author | Yves Orton <demerphq@gmail.com> | 2014-12-25 03:53:31 +0100 |
---|---|---|
committer | Yves Orton <demerphq@gmail.com> | 2014-12-25 03:53:31 +0100 |
commit | 1d43193d5d388c2cc55fe51bcb525be40cd80688 (patch) | |
tree | ee2581f528828884542be3cef686a5fcfc6f21d2 /sv.c | |
parent | 3efdcc9cc52ff5b9575a7be650bd473a7a56f550 (diff) | |
download | perl-1d43193d5d388c2cc55fe51bcb525be40cd80688.tar.gz |
add cast to make c++ happy
Diffstat (limited to 'sv.c')
-rw-r--r-- | sv.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -5959,7 +5959,7 @@ Perl_sv_get_backrefs(pTHX_ SV *const sv) if (SvTYPE(sv) == SVt_PVHV) { if (SvOOK(sv)) { struct xpvhv_aux * const iter = HvAUX((HV *)sv); - backrefs = iter->xhv_backreferences; + backrefs = (SV *)iter->xhv_backreferences; } } else if (SvMAGICAL(sv)) { MAGIC *mg = mg_find(sv, PERL_MAGIC_backref); |