forked from pool/perl-Unicode-Map8
Copy from devel:languages:perl/perl-Unicode-Map8 based on submit request 30401 from user anicka OBS-URL: https://build.opensuse.org/request/show/30401 OBS-URL: https://build.opensuse.org/package/show/openSUSE:Factory/perl-Unicode-Map8?expand=0&rev=6
12 lines
182 B
Diff
12 lines
182 B
Diff
--- Map8.xs
|
|
+++ Map8.xs
|
|
@@ -348,7 +348,7 @@
|
|
Map8* m2
|
|
PREINIT:
|
|
STRLEN len;
|
|
- STRLEN rlen;
|
|
+ int rlen;
|
|
char* res;
|
|
INPUT:
|
|
char* str = SvPV(ST(2), len);
|