arith.c (gfc_arith_done_1): Release mpfr internal caches.

2010-07-11  Mikael Morin  <mikael@gcc.gnu.org>

	* arith.c (gfc_arith_done_1): Release mpfr internal caches.

From-SVN: r162058

gcc/fortran/ChangeLog

+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

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 ();
 }