aboutsummaryrefslogtreecommitdiff
path: root/contrib/jsonb_plperl/sql/jsonb_plperlu.sql
diff options
context:
space:
mode:
authorTom Lane <tgl@sss.pgh.pa.us>2018-04-04 11:51:36 -0400
committerTom Lane <tgl@sss.pgh.pa.us>2018-04-04 11:51:36 -0400
commiteac93e20afe434a79e81558c17a7a1408cf9d74a (patch)
treefb9e24e12dfa34b9d52d9daa3f87dc3438c013a4 /contrib/jsonb_plperl/sql/jsonb_plperlu.sql
parent331b2369c0ad1e51d5e50bf5dd75232e0160553a (diff)
downloadpostgresql-eac93e20afe434a79e81558c17a7a1408cf9d74a.tar.gz
postgresql-eac93e20afe434a79e81558c17a7a1408cf9d74a.zip
Remove less-portable-than-believed test case.
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
Diffstat (limited to 'contrib/jsonb_plperl/sql/jsonb_plperlu.sql')
-rw-r--r--contrib/jsonb_plperl/sql/jsonb_plperlu.sql12
1 files changed, 0 insertions, 12 deletions
diff --git a/contrib/jsonb_plperl/sql/jsonb_plperlu.sql b/contrib/jsonb_plperl/sql/jsonb_plperlu.sql
index ab7d2e76e87..9287f7672f7 100644
--- a/contrib/jsonb_plperl/sql/jsonb_plperlu.sql
+++ b/contrib/jsonb_plperl/sql/jsonb_plperlu.sql
@@ -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