postgres.git / summary / log / commit / refs

commit    07341a2980a37ccbb3a51af2bd2f3c87953d8ea4
Author:   Tom Lane <tgl@sss.pgh.pa.us>
Date:     Mon Mar 14 18:45:45 2016 +0000

    Update PL/Perl's comment about hv_store().
    
    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);


[parent: f3f3aae4b784]