diff options
| author | Devin Heitmueller <devin.heitmueller@gmail.com> | 2007-04-20 14:20:21 -0400 |
|---|---|---|
| committer | Rafael Garcia-Suarez <rgarciasuarez@gmail.com> | 2007-04-26 16:57:55 +0000 |
| commit | 224e8ef5af1c2136286a2281940d1d58698affca (patch) | |
| tree | 8d6ffd2d3a09481b62e8a5734e06d1eeaf2ea0d3 /locale.c | |
| parent | 5f2fca8af102bdfade6a780b8fd225042720b67d (diff) | |
| download | perl-224e8ef5af1c2136286a2281940d1d58698affca.tar.gz | |
strxfrm() returns a size_t, not a ssize_t. See:
Subject: locale.c usage of strxfrm
From: "Devin Heitmueller" <devin.heitmueller@gmail.com>
Message-ID: <412bdbff0704201520i7aac0189n74f0cef5c5213f41@mail.gmail.com>
p4raw-id: //depot/perl@31092
Diffstat (limited to 'locale.c')
| -rw-r--r-- | locale.c | 4 |
1 files changed, 2 insertions, 2 deletions
@@ -588,11 +588,11 @@ Perl_mem_collxfrm(pTHX_ const char *s, STRLEN len, STRLEN *xlen) *(U32*)xbuf = PL_collation_ix; xout = sizeof(PL_collation_ix); for (xin = 0; xin < len; ) { - SSize_t xused; + Size_t xused; for (;;) { xused = strxfrm(xbuf + xout, s + xin, xAlloc - xout); - if (xused == -1) + if (xused >= PERL_INT_MAX) goto bad; if ((STRLEN)xused < xAlloc - xout) break; |