diff options
Diffstat (limited to 'gcc')
-rw-r--r-- | gcc/fortran/ChangeLog | 4 | ||||
-rw-r--r-- | gcc/fortran/arith.c | 2 |
2 files changed, 6 insertions, 0 deletions
diff --git a/gcc/fortran/ChangeLog b/gcc/fortran/ChangeLog index e6d4844..093631c 100644 --- a/gcc/fortran/ChangeLog +++ b/gcc/fortran/ChangeLog @@ -1,3 +1,7 @@ +2010-07-11 Mikael Morin <mikael@gcc.gnu.org> + + * arith.c (gfc_arith_done_1): Release mpfr internal caches. + 2010-07-11 Janus Weil <janus@gcc.gnu.org> PR fortran/44869 diff --git a/gcc/fortran/arith.c b/gcc/fortran/arith.c index 1e90584..f555eb1 100644 --- a/gcc/fortran/arith.c +++ b/gcc/fortran/arith.c @@ -260,6 +260,8 @@ gfc_arith_done_1 (void) for (rp = gfc_real_kinds; rp->kind; rp++) mpfr_clears (rp->epsilon, rp->huge, rp->tiny, rp->subnormal, NULL); + + mpfr_free_cache (); } |