godzil/tack
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Fix: used wrong name

Browse Source
This commit is contained in:
ceriel 1991-09-17 16:38:16 +00:00
parent 6693faf063
commit 3980e40773
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lang/pc/libpc/exp.c
View File

@ -16,6 +16,7 @@ extern _trp();
#include <pc_math.h> #include <pc_math.h>
#define M_MIN_D DBL_MIN #define M_MIN_D DBL_MIN
#define M_MAX_D DBL_MAX #define M_MAX_D DBL_MAX
#define M_DMINEXP DBL_MIN_EXP
#endif #endif
#undef HUGE #undef HUGE
#define HUGE 1e1000 #define HUGE 1e1000
@ -82,7 +83,7 @@ _exp(x)
if (g != 0.0) { if (g != 0.0) {
/* unnormalized numbers apparently exist */ /* unnormalized numbers apparently exist */
if (x < (M_LN2 * (DBL_MIN_EXP - 53))) return 0.0; if (x < (M_LN2 * (M_DMINEXP - 53))) return 0.0;
} }
else { else {
if (x < M_LN_MIN_D) return 0.0; if (x < M_LN_MIN_D) return 0.0;