summaryrefslogtreecommitdiff
path: root/sv.c
diff options
context:
space:
mode:
authorPerl 5 Porters <perl5-porters@africa.nicoh.com>1996-08-19 00:46:59 +0000
committerAndy Dougherty <doughera@lafcol.lafayette.edu>1996-08-19 00:46:59 +0000
commita026971d0f28d48a093e5fdd42c475d75eb83b44 (patch)
treef2d48444c3323bf23bcda6300ed549df07ce03bf /sv.c
parent4521c7914c9458406ab869e3d05e04c7de0567d5 (diff)
downloadperl-a026971d0f28d48a093e5fdd42c475d75eb83b44.tar.gz
Use memcmp instead of bcmp even when we don't care about order.
Diffstat (limited to 'sv.c')
-rw-r--r--sv.c6
1 files changed, 3 insertions, 3 deletions
diff --git a/sv.c b/sv.c
index 9fb9985050..8259b9048b 100644
--- a/sv.c
+++ b/sv.c
@@ -2520,7 +2520,7 @@ register SV *str2;
if (cur1 != cur2)
return 0;
- return !bcmp(pv1, pv2, cur1);
+ return !memcmp(pv1, pv2, cur1);
}
I32
@@ -2707,7 +2707,7 @@ I32 append;
thats_all_folks:
if ((rslen > 1 && (bp - (STDCHAR*)SvPVX(sv) < rslen)) ||
- bcmp((char*)bp - rslen, rsptr, rslen))
+ memcmp((char*)bp - rslen, rsptr, rslen))
goto screamer; /* go back to the fray */
thats_really_all_folks:
if (shortbuffered)
@@ -2742,7 +2742,7 @@ screamer2:
if (i != EOF && /* joy */
(!rslen ||
SvCUR(sv) < rslen ||
- bcmp(SvPVX(sv) + SvCUR(sv) - rslen, rsptr, rslen)))
+ memcmp(SvPVX(sv) + SvCUR(sv) - rslen, rsptr, rslen)))
{
append = -1;
goto screamer2;