Fortran: fix frontend memleak with DO CONCURRENT [PR122564]

harald-anlauf · harald-anlauf · commit 4cad566793d0 · 2025-11-04T20:04:55.000+01:00
PR fortran/122564

gcc/fortran/ChangeLog:

	* resolve.cc (resolve_locality_spec): Delete temporary hash_set.
diff --git 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

Original file line number	Diff line number	Diff line change
`@@ -8754,6 +8754,8 @@ resolve_locality_spec (gfc_code code, gfc_namespace ns)`
`8754`	`8754`	`plist = &((*plist)->next);`
`8755`	`8755`	`}`
`8756`	`8756`	`}`
	`8757`	`+`
	`8758`	`+ delete data.sym_hash;`
`8757`	`8759`	`}`
`8758`	`8760`
`8759`	`8761`	`/* Resolve a list of FORALL iterators. The FORALL index-name is constrained`