From 07341a2980a37ccbb3a51af2bd2f3c87953d8ea4 Mon Sep 17 00:00:00 2001 From: Tom Lane Date: Mon, 14 Mar 2016 14:45:45 -0400 Subject: [PATCH] Update PL/Perl's comment about hv_store(). MIME-Version: 1.0 Content-Type: text/plain; charset=utf8 Content-Transfer-Encoding: 8bit Negative klen is documented since Perl 5.16, and 5.6 is no longer supported so no need to comment about it. Dagfinn Ilmari Mannsåker --- src/pl/plperl/plperl.c | 6 ++---- 1 file changed, 2 insertions(+), 4 deletions(-) diff --git a/src/pl/plperl/plperl.c b/src/pl/plperl/plperl.c index 1114b594165..f60c227dda2 100644 --- a/src/pl/plperl/plperl.c +++ b/src/pl/plperl/plperl.c @@ -3907,10 +3907,8 @@ hv_store_string(HV *hv, const char *key, SV *val) hkey = pg_server_to_any(key, strlen(key), PG_UTF8); /* - * This seems nowhere documented, but under Perl 5.8.0 and up, hv_store() - * recognizes a negative klen parameter as meaning a UTF-8 encoded key. It - * does not appear that hashes track UTF-8-ness of keys at all in Perl - * 5.6. + * hv_store() recognizes a negative klen parameter as meaning a UTF-8 + * encoded key. */ hlen = -(int) strlen(hkey); ret = hv_store(hv, hkey, hlen, val, 0); -- 2.39.5