mirror of
https://github.com/postgres/postgres.git
synced 2026-03-12 05:32:27 -04:00
The POSIX spec says that rint() rounds halfway cases to nearest even. Our substitute implementation failed to do that, rather rounding halfway cases away from zero; and it also got some other cases (such as minus zero) wrong. This led to observable cross-platform differences, as reported in bug #12885 from Rich Schaaf; in particular, casting from float to int didn't honor round-to-nearest-even on builds using rint.c. Implement something that attempts to cover all cases per spec, and add some simple regression tests so that we'll notice if any platforms still get this wrong. Although this is a bug fix, no back-patch, as a behavioral change in the back branches was agreed not to be a good idea. Pedro Gimeno Fortea, reviewed by Michael Paquier and myself
104 lines
2.9 KiB
SQL
104 lines
2.9 KiB
SQL
--
|
|
-- INT2
|
|
--
|
|
|
|
CREATE TABLE INT2_TBL(f1 int2);
|
|
|
|
INSERT INTO INT2_TBL(f1) VALUES ('0 ');
|
|
|
|
INSERT INTO INT2_TBL(f1) VALUES (' 1234 ');
|
|
|
|
INSERT INTO INT2_TBL(f1) VALUES (' -1234');
|
|
|
|
INSERT INTO INT2_TBL(f1) VALUES ('34.5');
|
|
|
|
-- largest and smallest values
|
|
INSERT INTO INT2_TBL(f1) VALUES ('32767');
|
|
|
|
INSERT INTO INT2_TBL(f1) VALUES ('-32767');
|
|
|
|
-- bad input values -- should give errors
|
|
INSERT INTO INT2_TBL(f1) VALUES ('100000');
|
|
INSERT INTO INT2_TBL(f1) VALUES ('asdf');
|
|
INSERT INTO INT2_TBL(f1) VALUES (' ');
|
|
INSERT INTO INT2_TBL(f1) VALUES ('- 1234');
|
|
INSERT INTO INT2_TBL(f1) VALUES ('4 444');
|
|
INSERT INTO INT2_TBL(f1) VALUES ('123 dt');
|
|
INSERT INTO INT2_TBL(f1) VALUES ('');
|
|
|
|
|
|
SELECT '' AS five, * FROM INT2_TBL;
|
|
|
|
SELECT '' AS four, i.* FROM INT2_TBL i WHERE i.f1 <> int2 '0';
|
|
|
|
SELECT '' AS four, i.* FROM INT2_TBL i WHERE i.f1 <> int4 '0';
|
|
|
|
SELECT '' AS one, i.* FROM INT2_TBL i WHERE i.f1 = int2 '0';
|
|
|
|
SELECT '' AS one, i.* FROM INT2_TBL i WHERE i.f1 = int4 '0';
|
|
|
|
SELECT '' AS two, i.* FROM INT2_TBL i WHERE i.f1 < int2 '0';
|
|
|
|
SELECT '' AS two, i.* FROM INT2_TBL i WHERE i.f1 < int4 '0';
|
|
|
|
SELECT '' AS three, i.* FROM INT2_TBL i WHERE i.f1 <= int2 '0';
|
|
|
|
SELECT '' AS three, i.* FROM INT2_TBL i WHERE i.f1 <= int4 '0';
|
|
|
|
SELECT '' AS two, i.* FROM INT2_TBL i WHERE i.f1 > int2 '0';
|
|
|
|
SELECT '' AS two, i.* FROM INT2_TBL i WHERE i.f1 > int4 '0';
|
|
|
|
SELECT '' AS three, i.* FROM INT2_TBL i WHERE i.f1 >= int2 '0';
|
|
|
|
SELECT '' AS three, i.* FROM INT2_TBL i WHERE i.f1 >= int4 '0';
|
|
|
|
-- positive odds
|
|
SELECT '' AS one, i.* FROM INT2_TBL i WHERE (i.f1 % int2 '2') = int2 '1';
|
|
|
|
-- any evens
|
|
SELECT '' AS three, i.* FROM INT2_TBL i WHERE (i.f1 % int4 '2') = int2 '0';
|
|
|
|
SELECT '' AS five, i.f1, i.f1 * int2 '2' AS x FROM INT2_TBL i;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 * int2 '2' AS x FROM INT2_TBL i
|
|
WHERE abs(f1) < 16384;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 * int4 '2' AS x FROM INT2_TBL i;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 + int2 '2' AS x FROM INT2_TBL i;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 + int2 '2' AS x FROM INT2_TBL i
|
|
WHERE f1 < 32766;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 + int4 '2' AS x FROM INT2_TBL i;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 - int2 '2' AS x FROM INT2_TBL i;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 - int2 '2' AS x FROM INT2_TBL i
|
|
WHERE f1 > -32767;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 - int4 '2' AS x FROM INT2_TBL i;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 / int2 '2' AS x FROM INT2_TBL i;
|
|
|
|
SELECT '' AS five, i.f1, i.f1 / int4 '2' AS x FROM INT2_TBL i;
|
|
|
|
-- corner cases
|
|
SELECT (-1::int2<<15)::text;
|
|
SELECT ((-1::int2<<15)+1::int2)::text;
|
|
|
|
-- check sane handling of INT16_MIN overflow cases
|
|
SELECT (-32768)::int2 * (-1)::int2;
|
|
SELECT (-32768)::int2 / (-1)::int2;
|
|
SELECT (-32768)::int2 % (-1)::int2;
|
|
|
|
-- check rounding when casting from float
|
|
SELECT x, x::int2 AS int2_value
|
|
FROM (VALUES (-2.5::float8),
|
|
(-1.5::float8),
|
|
(-0.5::float8),
|
|
(0.0::float8),
|
|
(0.5::float8),
|
|
(1.5::float8),
|
|
(2.5::float8)) t(x);
|