Supply now required HeUTF8 macro for plperl where it's missing, per buildfarm results.

This commit is contained in:
Andrew Dunstan 2011-02-06 21:36:56 -05:00
parent fb7355e0ce
commit c852e95b0b

View File

@ -42,6 +42,13 @@
#undef bool #undef bool
#endif #endif
/* supply HeUTF8 if it's missing - ppport.h doesn't supply it, unfortunately */
#ifndef HeUTF8
#define HeUTF8(he) ((HeKLEN(he) == HEf_SVKEY) ? \
SvUTF8(HeKEY_sv(he)) : \
(U32)HeKUTF8(he))
#endif
/* declare routines from plperl.c for access by .xs files */ /* declare routines from plperl.c for access by .xs files */
HV *plperl_spi_exec(char *, int); HV *plperl_spi_exec(char *, int);
void plperl_return_next(SV *); void plperl_return_next(SV *);