diff options
Diffstat (limited to 'contrib/jsonb_plperl')
| -rw-r--r-- | contrib/jsonb_plperl/expected/jsonb_plperlu.out | 6 | ||||
| -rw-r--r-- | contrib/jsonb_plperl/sql/jsonb_plperlu.sql | 3 |
2 files changed, 4 insertions, 5 deletions
diff --git a/contrib/jsonb_plperl/expected/jsonb_plperlu.out b/contrib/jsonb_plperl/expected/jsonb_plperlu.out index 3f5c5c681dd..fe8ca19a719 100644 --- a/contrib/jsonb_plperl/expected/jsonb_plperlu.out +++ b/contrib/jsonb_plperl/expected/jsonb_plperlu.out @@ -78,10 +78,8 @@ INFO: $VAR1 = '1'; 1 (1 row) -SELECT roundtrip('1E+131071'); -INFO: $VAR1 = 'inf'; -ERROR: cannot convert infinity to jsonb -CONTEXT: PL/Perl function "roundtrip" +-- skip because Data::Dumper produces a platform-dependent spelling of infinity +-- SELECT roundtrip('1E+131071'); SELECT roundtrip('-1'); INFO: $VAR1 = '-1'; roundtrip diff --git a/contrib/jsonb_plperl/sql/jsonb_plperlu.sql b/contrib/jsonb_plperl/sql/jsonb_plperlu.sql index 49c71fbc441..907dd4f73c8 100644 --- a/contrib/jsonb_plperl/sql/jsonb_plperlu.sql +++ b/contrib/jsonb_plperl/sql/jsonb_plperlu.sql @@ -61,7 +61,8 @@ $$; SELECT roundtrip('null') is null; SELECT roundtrip('1'); -SELECT roundtrip('1E+131071'); +-- skip because Data::Dumper produces a platform-dependent spelling of infinity +-- SELECT roundtrip('1E+131071'); SELECT roundtrip('-1'); SELECT roundtrip('1.2'); SELECT roundtrip('-1.2'); |