summaryrefslogtreecommitdiff
path: root/Build/source/texk/web2c/mplibdir/mpmathdecimal.w
diff options
context:
space:
mode:
authorAkira Kakuto <kakuto@fuk.kindai.ac.jp>2020-08-21 20:56:11 +0000
committerAkira Kakuto <kakuto@fuk.kindai.ac.jp>2020-08-21 20:56:11 +0000
commit689aabd7ce016445d85c25b5c815b53a975e4f29 (patch)
tree431c5900d36e5153839c62e53fd0da985e850e07 /Build/source/texk/web2c/mplibdir/mpmathdecimal.w
parent2d68921a31e76c873fbfad6f39e035c23a3e9faa (diff)
metapost: sync with the upstream
git-svn-id: svn://tug.org/texlive/trunk@56147 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Build/source/texk/web2c/mplibdir/mpmathdecimal.w')
-rw-r--r--Build/source/texk/web2c/mplibdir/mpmathdecimal.w4
1 files changed, 2 insertions, 2 deletions
diff --git a/Build/source/texk/web2c/mplibdir/mpmathdecimal.w b/Build/source/texk/web2c/mplibdir/mpmathdecimal.w
index 2ddc216470e..5c2a8fe624e 100644
--- a/Build/source/texk/web2c/mplibdir/mpmathdecimal.w
+++ b/Build/source/texk/web2c/mplibdir/mpmathdecimal.w
@@ -346,7 +346,7 @@ void * mp_initialize_decimal_math (MP mp);
@d p_over_v_threshold 0x80000 /* TODO */
@d equation_threshold 0.001
@d tfm_warn_threshold 0.0625
-@d epsilon "1E-52"
+@d epsilon pow(2.0,-173.0) /* almost "1E-52" */
@d epsilonf pow(2.0,-52.0)
@d EL_GORDO "1E1000000" /* the largest value that \MP\ likes. */
@d warning_limit "1E1000000" /* this is a large value that can just be expressed without loss of precision */
@@ -394,7 +394,7 @@ void * mp_initialize_decimal_math (MP mp) {
decNumberFromInt32(&fraction_one_plus_decNumber, (fraction_one+1));
decNumberFromInt32(&angle_multiplier_decNumber, angle_multiplier);
decNumberFromString(&PI_decNumber, PI_STRING, &set);
- decNumberFromString(&epsilon_decNumber, epsilon, &set);
+ decNumberFromDouble(&epsilon_decNumber, epsilon);
decNumberFromString(&EL_GORDO_decNumber, EL_GORDO, &set);
factorials = (decNumber **)mp_xmalloc(mp,PRECALC_FACTORIALS_CACHESIZE,sizeof(decNumber *));
factorials[0] = (decNumber *)mp_xmalloc(mp,1,sizeof(decNumber));