From e4300a3552b104f54ec781dd23cfcf96252ec5c1 Mon Sep 17 00:00:00 2001 From: Tom Lane Date: Mon, 18 Jun 2018 14:53:21 -0400 Subject: [PATCH] Avoid platform-dependent output from Data::Dumper. Per buildfarm, the output from Data::Dumper for an IEEE infinity is platform-dependent (e.g. "inf" vs "Inf"). Just skip that one test case in the plperlu test; testing it on the plperl side is coverage enough. Fixes issue in commit 1731e3741. --- contrib/jsonb_plperl/expected/jsonb_plperlu.out | 6 ++---- 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 3f5c5c681d..fe8ca19a71 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 49c71fbc44..907dd4f73c 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'); -- 2.39.5