Fortran: frontend passes do_subscript leaks gmp memory [PR108924]

gcc/fortran/ChangeLog:

	PR fortran/108924
	* frontend-passes.cc (do_subscript): Clear used gmp variable.

diff --git a/gcc/fortran/frontend-passes.cc b/gcc/fortran/frontend-passes.cc
index 02fcb41dbc4112abceb0dd397d01b8d557450765..90428982023241814f6c2f8e561352ee5999690c 100644 (file)
--- a/gcc/fortran/frontend-passes.cc
+++ b/gcc/fortran/frontend-passes.cc
@@ -2883,7 +2883,10 @@ do_subscript (gfc_expr **e)
                have_do_end = false;
 
              if (!have_do_start && !have_do_end)
-               return 0;
+               {
+                 mpz_clear (do_step);
+                 return 0;
+               }
 
              /* No warning inside a zero-trip loop.  */
              if (have_do_start && have_do_end)