summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorAndy Lester <andy@petdance.com>2005-06-16 04:13:42 -0500
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2005-06-16 13:55:18 +0000
commita6e20a404b42cad25eb97280fa2bcacffda64cd6 (patch)
treebecab207af03fe0a26c7ec2809551b75b0302163 /sv.c
parent0dea61d9463d40d400a2f349f672ec0d9dcba752 (diff)
downloadperl-a6e20a404b42cad25eb97280fa2bcacffda64cd6.tar.gz
Removing /*SUPPRESS xxx*/
Message-ID: <20050616141342.GA22188@petdance.com> p4raw-id: //depot/perl@24871
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c2
1 files changed, 0 insertions, 2 deletions
diff --git a/sv.c b/sv.c
index bd49a28e22..f690ee6fce 100644
--- a/sv.c
+++ b/sv.c
@@ -4587,7 +4587,6 @@ Perl_sv_setsv_flags(pTHX_ SV *dstr, register SV *sstr, I32 flags)
}
if (sflags & SVf_UTF8)
SvUTF8_on(dstr);
- /*SUPPRESS 560*/
if (sflags & SVp_NOK) {
SvNOKp_on(dstr);
if (sflags & SVf_NOK)
@@ -5739,7 +5738,6 @@ Perl_sv_insert(pTHX_ SV *bigstr, STRLEN offset, STRLEN len, const char *little,
*mid = '\0';
SvCUR_set(bigstr, mid - big);
}
- /*SUPPRESS 560*/
else if ((i = mid - big)) { /* faster from front */
midend -= littlelen;
mid = midend;