diff options
Diffstat (limited to 'contrib/jsonb_plperl/sql/jsonb_plperl.sql')
| -rw-r--r-- | contrib/jsonb_plperl/sql/jsonb_plperl.sql | 22 |
1 files changed, 0 insertions, 22 deletions
diff --git a/contrib/jsonb_plperl/sql/jsonb_plperl.sql b/contrib/jsonb_plperl/sql/jsonb_plperl.sql index 436e18730f8..8b0a8764afa 100644 --- a/contrib/jsonb_plperl/sql/jsonb_plperl.sql +++ b/contrib/jsonb_plperl/sql/jsonb_plperl.sql @@ -34,28 +34,6 @@ $$; SELECT testSVToJsonb(); -CREATE FUNCTION testInf() RETURNS jsonb -LANGUAGE plperl -TRANSFORM FOR TYPE jsonb -AS $$ -$val = 9**9**9; # we assume this will overflow to +Inf -return $val; -$$; - -SELECT testInf(); - - -CREATE FUNCTION testNaN() RETURNS jsonb -LANGUAGE plperl -TRANSFORM FOR TYPE jsonb -AS $$ -$val = sin(9**9**9); # we assume sin(inf) will yield NaN -return $val; -$$; - -SELECT testNaN(); - - -- this revealed a bug in the original implementation CREATE FUNCTION testRegexpResultToJsonb() RETURNS jsonb LANGUAGE plperl |