From 4cad566793d0a2587a10f9669dfd0f5cdbd6d82d Mon Sep 17 00:00:00 2001
From: Harald Anlauf <anlauf@gmx.de>
Date: Tue, 4 Nov 2025 20:04:55 +0100
Subject: [PATCH] Fortran: fix frontend memleak with DO CONCURRENT [PR122564]

	PR fortran/122564

gcc/fortran/ChangeLog:

	* resolve.cc (resolve_locality_spec): Delete temporary hash_set.
---
 gcc/fortran/resolve.cc | 2 ++
 1 file changed, 2 insertions(+)

diff --git a/gcc/fortran/resolve.cc b/gcc/fortran/resolve.cc
index 5fa408ec48c..2a73f2a7ab5 100644
--- a/gcc/fortran/resolve.cc
+++ b/gcc/fortran/resolve.cc
@@ -8754,6 +8754,8 @@ resolve_locality_spec (gfc_code *code, gfc_namespace *ns)
 	  plist = &((*plist)->next);
 	}
     }
+
+  delete data.sym_hash;
 }
 
 /* Resolve a list of FORALL iterators.  The FORALL index-name is constrained
-- 
2.47.3