float8 arg2 = PG_GETARG_FLOAT8(1);
float8 result;
- /*
- * The POSIX spec says that NaN ^ 0 = 1, and 1 ^ NaN = 1, while all other
- * cases with NaN inputs yield NaN (with no error). Many older platforms
- * get one or more of these cases wrong, so deal with them via explicit
- * logic rather than trusting pow(3).
- */
- if (isnan(arg1))
- {
- if (isnan(arg2) || arg2 != 0.0)
- PG_RETURN_FLOAT8(get_float8_nan());
- PG_RETURN_FLOAT8(1.0);
- }
- if (isnan(arg2))
- {
- if (arg1 != 1.0)
- PG_RETURN_FLOAT8(get_float8_nan());
- PG_RETURN_FLOAT8(1.0);
- }
-
/*
* The SQL spec requires that we emit a particular SQLSTATE error code for
* certain error conditions. Specifically, we don't return a
* pow() sets errno only on some platforms, depending on whether it
* follows _IEEE_, _POSIX_, _XOPEN_, or _SVID_, so we try to avoid using
* errno. However, some platform/CPU combinations return errno == EDOM
- * and result == NaN for negative arg1 and very large arg2 (they must be
+ * and result == Nan for negative arg1 and very large arg2 (they must be
* using something different from our floor() test to decide it's
* invalid). Other platforms (HPPA) return errno == ERANGE and a large
* (HUGE_VAL) but finite result to signal overflow.
12
(1 row)
-SELECT power(float8 'NaN', float8 '0.5');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '144', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 'NaN', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '-1', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '1', float8 'NaN');
- power
--------
- 1
-(1 row)
-
-SELECT power(float8 'NaN', float8 '0');
- power
--------
- 1
-(1 row)
-
-- take exp of ln(f.f1)
SELECT '' AS three, f.f1, exp(ln(f.f1)) AS exp_ln_f1
FROM FLOAT8_TBL f
12
(1 row)
-SELECT power(float8 'NaN', float8 '0.5');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '144', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 'NaN', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '-1', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '1', float8 'NaN');
- power
--------
- 1
-(1 row)
-
-SELECT power(float8 'NaN', float8 '0');
- power
--------
- 1
-(1 row)
-
-- take exp of ln(f.f1)
SELECT '' AS three, f.f1, exp(ln(f.f1)) AS exp_ln_f1
FROM FLOAT8_TBL f
12
(1 row)
-SELECT power(float8 'NaN', float8 '0.5');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '144', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 'NaN', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '-1', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '1', float8 'NaN');
- power
--------
- 1
-(1 row)
-
-SELECT power(float8 'NaN', float8 '0');
- power
--------
- 1
-(1 row)
-
-- take exp of ln(f.f1)
SELECT '' AS three, f.f1, exp(ln(f.f1)) AS exp_ln_f1
FROM FLOAT8_TBL f
12
(1 row)
-SELECT power(float8 'NaN', float8 '0.5');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '144', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 'NaN', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '-1', float8 'NaN');
- power
--------
- NaN
-(1 row)
-
-SELECT power(float8 '1', float8 'NaN');
- power
--------
- 1
-(1 row)
-
-SELECT power(float8 'NaN', float8 '0');
- power
--------
- 1
-(1 row)
-
-- take exp of ln(f.f1)
SELECT '' AS three, f.f1, exp(ln(f.f1)) AS exp_ln_f1
FROM FLOAT8_TBL f
-- power
SELECT power(float8 '144', float8 '0.5');
-SELECT power(float8 'NaN', float8 '0.5');
-SELECT power(float8 '144', float8 'NaN');
-SELECT power(float8 'NaN', float8 'NaN');
-SELECT power(float8 '-1', float8 'NaN');
-SELECT power(float8 '1', float8 'NaN');
-SELECT power(float8 'NaN', float8 '0');
-- take exp of ln(f.f1)
SELECT '' AS three, f.f1, exp(ln(f.f1)) AS exp_ln_f1