postgres.git / summary / log / commit / refs
commit c852e95b0bcbe708ba64b9499e50b9cc98bd7b71
Author: Andrew Dunstan <andrew@dunslane.net>
Date: Mon Feb 07 02:36:56 2011 +0000
First released in: 9.1.0
Supply now required HeUTF8 macro for plperl where it's missing, per buildfarm results.
src/pl/plperl/plperl.h | 7 +++++++
1 file changed, 7 insertions(+)
diff --git a/src/pl/plperl/plperl.h b/src/pl/plperl/plperl.h
index 98d18e7723d..1e0bad101aa 100644
--- a/src/pl/plperl/plperl.h
+++ b/src/pl/plperl/plperl.h
@@ -42,6 +42,13 @@
#undef bool
#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 */
HV *plperl_spi_exec(char *, int);
void plperl_return_next(SV *);
[parent: fb7355e0cedf]