From: Harald Anlauf <anlauf@gmx.de>
Date: Fri, 24 Feb 2023 18:56:32 +0000 (+0100)
Subject: Fortran: frontend passes do_subscript leaks gmp memory [PR108924]
X-Git-Tag: basepoints/gcc-14~871
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=45f406c4f62e516b58dcda20b5a7aa43ff0aa0f3;p=thirdparty%2Fgcc.git

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 02fcb41dbc41..904289820232 100644
--- 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)