From f5e80d2a183a5fd902cef45ce0299983fb941ebd Mon Sep 17 00:00:00 2001 From: John Darrington Date: Sat, 4 Jul 2020 08:38:33 +0200 Subject: [PATCH] lib/ptukey.c: Use the standard macro INFINITY from the math library --- lib/tukey/ptukey.c | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/lib/tukey/ptukey.c b/lib/tukey/ptukey.c index d2c46270a8..07923d98bd 100644 --- a/lib/tukey/ptukey.c +++ b/lib/tukey/ptukey.c @@ -71,7 +71,7 @@ #include #include -#define R_D__0 (log_p ? ML_NEGINF : 0.) /* 0 */ +#define R_D__0 (log_p ? -INFINITY : 0.) /* 0 */ #define R_D__1 (log_p ? 0. : 1.) /* 1 */ #define R_DT_0 (lower_tail ? R_D__0 : R_D__1) /* 0 */ #define R_DT_1 (lower_tail ? R_D__1 : R_D__0) /* 1 */ @@ -272,7 +272,6 @@ wprob (double w, double rr, double cc) double ptukey (double q, double rr, double cc, double df, int lower_tail, int log_p) { - const double ML_NEGINF = -1.0 / 0.0; /* function ptukey() [was qprob() ]: q = value of studentized range -- 2.30.2