summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorPhilip M. Gollucci <pgollucci@p6m7g8.com>2006-09-17 18:30:05 -0700
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2006-09-18 08:37:21 +0000
commit1d9c78c6de744b5c7eec4470968743afe4f03acd (patch)
treefaff1c026d6e7de059039e1adf990405e3334c17 /sv.c
parent63e3af20059610d29fa934e8330849fee9c115c5 (diff)
downloadperl-1d9c78c6de744b5c7eec4470968743afe4f03acd.tar.gz
bleed - silence warning in sv.c
From: "Philip M. Gollucci" <pgollucci@p6m7g8.com> Message-ID: <450E590D.1060205@p6m7g8.com> p4raw-id: //depot/perl@28865
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 c82f2d67b8..6e395efed2 100644
--- a/sv.c
+++ b/sv.c
@@ -3477,7 +3477,7 @@ Perl_sv_setsv_flags(pTHX_ SV *dstr, register SV *sstr, I32 flags)
case SVt_PVBM:
if (SvGMAGICAL(sstr) && (flags & SV_GMAGIC)) {
mg_get(sstr);
- if ((int)SvTYPE(sstr) != stype) {
+ if (SvTYPE(sstr) != stype) {
stype = SvTYPE(sstr);
if (stype == SVt_PVGV && dtype <= SVt_PVGV) {
glob_assign_glob(dstr, sstr, dtype);