summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-04-11 13:45:43 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2008-04-11 13:45:43 +0000
commitc4f3bd1eee42dd26d655edfa88fdf9885eb82325 (patch)
tree72c374492c0fd0df640a794806149dea5aa2ac3a /sv.c
parent9d0f7ed7530aacfa94e94c3784145f348ffa6be9 (diff)
downloadperl-c4f3bd1eee42dd26d655edfa88fdf9885eb82325.tar.gz
Fix C portability nit found by Jerry D. Hedden.
p4raw-id: //depot/perl@33669
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/sv.c b/sv.c
index f9546e11a9..a61f90ae3c 100644
--- a/sv.c
+++ b/sv.c
@@ -7873,8 +7873,8 @@ Perl_sv_2cv(pTHX_ SV *sv, HV **const st, GV **const gvp, const I32 lref)
default:
if (SvROK(sv)) {
- SvGETMAGIC(sv);
SV * const *sp = &sv; /* Used in tryAMAGICunDEREF macro. */
+ SvGETMAGIC(sv);
tryAMAGICunDEREF(to_cv);
sv = SvRV(sv);