summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>1998-10-31 11:31:12 +0000
committerGurusamy Sarathy <gsar@cpan.org>1998-10-31 11:31:12 +0000
commit0f4592effc29e9b2deb638f6f7e6129ffa8326e3 (patch)
treeb8fbcd67d7fe6fa236b040cfcc37fb9feda19ef5 /sv.c
parente8c20960f1361f5ece79a169ec3ac2d3421a8427 (diff)
downloadperl-0f4592effc29e9b2deb638f6f7e6129ffa8326e3.tar.gz
bump patchlevel; other minor fixes for clean build and test on
Solaris and win32 p4raw-id: //depot/perl@2163
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/sv.c b/sv.c
index 807e63c864..9dfa4f62a1 100644
--- a/sv.c
+++ b/sv.c
@@ -4047,6 +4047,7 @@ sv_2cv(SV *sv, HV **st, GV **gvp, I32 lref)
if (SvGMAGICAL(sv))
mg_get(sv);
if (SvROK(sv)) {
+ dTHR;
SV **sp = &sv; /* Used in tryAMAGICunDEREF macro. */
tryAMAGICunDEREF(to_cv);