1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
|
/*-------------------------------------------------------------------------
*
* float.c
* Functions for the built-in floating-point types.
*
* Portions Copyright (c) 1996-2021, PostgreSQL Global Development Group
* Portions Copyright (c) 1994, Regents of the University of California
*
*
* IDENTIFICATION
* src/backend/utils/adt/float.c
*
*-------------------------------------------------------------------------
*/
#include "postgres.h"
#include <ctype.h>
#include <float.h>
#include <math.h>
#include <limits.h>
/*
* Configurable GUC parameter
*
* If >0, use shortest-decimal format for output; this is both the default and
* allows for compatibility with clients that explicitly set a value here to
* get round-trip-accurate results. If 0 or less, then use the old, slow,
* decimal rounding method.
*/
int extra_float_digits = 1;
/*
* We use these out-of-line ereport() calls to report float overflow,
* underflow, and zero-divide, because following our usual practice of
* repeating them at each call site would lead to a lot of code bloat.
*
* This does mean that you don't get a useful error location indicator.
*/
pg_noinline void
float_overflow_error(void)
{
elog(ERROR, "value out of range: overflow");
}
pg_noinline void
float_underflow_error(void)
{
elog(ERROR, "value out of range: underflow");
}
pg_noinline void
float_zero_divide_error(void)
{
elog(ERROR, "division by zero");
}
/*
* float8{eq,ne,lt,le,gt,ge} - float8/float8 comparison operations
*/
int
float8_cmp_internal(float8 a, float8 b)
{
if (float8_gt(a, b))
return 1;
if (float8_lt(a, b))
return -1;
return 0;
}
|
