database/postgres
1
0
Fork 0
mirror of https://github.com/postgres/postgres.git synced 2025-06-11 20:28:21 +03:00
Code Activity

Remove less-portable-than-believed test case.

Browse Source 
In commit 331b2369c I added a test to see what jsonb_plperl would do
with a qr{} result.  Turns out the answer is Perl version dependent.
That fact doesn't bother me particularly, but coping with multiple
result possibilities is way more work than this test seems worth.
So remove it again.

Discussion: https://postgr.es/m/E1f3MMJ-0006bf-B0@gemulon.postgresql.org
This commit is contained in:
Tom Lane
2018-04-04 11:51:36 -04:00
parent 331b2369c0
commit eac93e20af
4 changed files with 2 additions and 48 deletions
Download Patch File Download Diff File Expand all files Collapse all files

12
contrib/jsonb_plperl/sql/jsonb_plperlu.sql
View File

@ -34,18 +34,6 @@ $$;
SELECT testSVToJsonb();
-- unsupported (for now)
CREATE FUNCTION testRegexpToJsonb() RETURNS jsonb
LANGUAGE plperlu
TRANSFORM FOR TYPE jsonb
AS $$
my $a = qr/foo/;
return ($a);
$$;
SELECT testRegexpToJsonb();
-- this revealed a bug in the original implementation
CREATE FUNCTION testRegexpResultToJsonb() RETURNS jsonb
LANGUAGE plperlu