summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2020-01-13 09:01:08 -0700
committerKarl Williamson <khw@cpan.org>2020-01-14 07:34:56 -0700
commit221973240894da0c3c0d852f323b540dc55a87f8 (patch)
tree7469c2b7301141dc12d4eecd8b35bdad50f27de0 /utf8.c
parent2b1f0c39c2a0de7f6e03349f2930c3eb6bd6208c (diff)
downloadperl-221973240894da0c3c0d852f323b540dc55a87f8.tar.gz
utf8.c: Change variable types so compiles on Solaris
This was made necessary by 40d2776f3505d22a2b1309ae2c3bf28bcb1d9016
Diffstat (limited to 'utf8.c')
-rw-r--r--utf8.c4
1 files changed, 2 insertions, 2 deletions
diff --git a/utf8.c b/utf8.c
index bbe5e58c6d..a1f66326b9 100644
--- a/utf8.c
+++ b/utf8.c
@@ -3350,13 +3350,13 @@ S__to_utf8_case(pTHX_ const UV uv1, const U8 *p,
{
unsigned int i;
- const unsigned int * cp_list;
+ const U32 * cp_list;
U8 * d;
/* 'index' is guaranteed to be non-negative, as this is an inversion
* map that covers all possible inputs. See [perl #133365] */
SSize_t index = _invlist_search(invlist, uv1);
- IV base = invmap[index];
+ I32 base = invmap[index];
/* The data structures are set up so that if 'base' is non-negative,
* the case change is 1-to-1; and if 0, the change is to itself */