From: Harald Anlauf <anlauf@gmx.de>
Date: Fri, 24 Mar 2023 21:07:37 +0000 (+0100)
Subject: Fortran: fix FE memleak with BOZ expressions.
X-Git-Tag: basepoints/gcc-14~350
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=833233a4aefc9981b671c1bda34676c20b76cc90;p=thirdparty%2Fgcc.git

Fortran: fix FE memleak with BOZ expressions.

gcc/fortran/ChangeLog:

	* expr.cc (free_expr0): Free also BOZ strings as part of an expression.
---

diff --git a/gcc/fortran/expr.cc b/gcc/fortran/expr.cc
index 4662328bf315..7fb33f817889 100644
--- a/gcc/fortran/expr.cc
+++ b/gcc/fortran/expr.cc
@@ -466,6 +466,10 @@ free_expr0 (gfc_expr *e)
 	  mpc_clear (e->value.complex);
 	  break;
 
+	case BT_BOZ:
+	  free (e->boz.str);
+	  break;
+
 	default:
 	  break;
 	}