From c73f047d6f63b1811ff548cee8a34fdf3532b8f2 Mon Sep 17 00:00:00 2001 From: Atanas Trayanov Date: Tue, 6 Feb 2024 09:02:41 -0500 Subject: [PATCH 1/2] Fixed a memory leak affecting regional masking --- CHANGELOG.md | 1 + gridcomps/ExtData2G/ExtDataMasking.F90 | 3 +++ 2 files changed, 4 insertions(+) diff --git a/CHANGELOG.md b/CHANGELOG.md index cdb39510e8a7..96d3a395cb8f 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -12,6 +12,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0 ### Changed ### Fixed +- fixed memory leak affecting reginal masking. Temporary ESMF field was created but never destroyed ### Removed diff --git a/gridcomps/ExtData2G/ExtDataMasking.F90 b/gridcomps/ExtData2G/ExtDataMasking.F90 index b11bf4638e2f..8eef6711c3e3 100644 --- a/gridcomps/ExtData2G/ExtDataMasking.F90 +++ b/gridcomps/ExtData2G/ExtDataMasking.F90 @@ -186,6 +186,7 @@ subroutine evaluate_region_mask(this,state,var_name,rc) enddo end if deallocate( mask) + call ESMF_FieldDestroy(temp_field, noGarbage=.true., _RC) _RETURN(_SUCCESS) end subroutine evaluate_region_mask @@ -256,6 +257,7 @@ subroutine evaluate_zone_mask(this,state,var_name,rc) where(limitS <= lats .and. lats <=limitN) var3d(:,:,i) = rvar3d(:,:,i) enddo end if + call ESMF_FieldDestroy(temp_field, noGarbage=.true., _RC) _RETURN(_SUCCESS) end subroutine evaluate_zone_mask @@ -424,6 +426,7 @@ subroutine evaluate_box_mask(this,state,var_name,rc) end if deallocate(temp2d) end if + call ESMF_FieldDestroy(temp_field, noGarbage=.true., _RC) _RETURN(_SUCCESS) end subroutine evaluate_box_mask From f26ef342c5bb2a218b0f037bf2eeb15971b201b1 Mon Sep 17 00:00:00 2001 From: Tom Clune Date: Tue, 6 Feb 2024 09:28:37 -0500 Subject: [PATCH 2/2] Update CHANGELOG.md --- CHANGELOG.md | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/CHANGELOG.md b/CHANGELOG.md index 96d3a395cb8f..0be15b74aeb1 100644 --- a/CHANGELOG.md +++ b/CHANGELOG.md @@ -12,7 +12,7 @@ and this project adheres to [Semantic Versioning](https://semver.org/spec/v2.0.0 ### Changed ### Fixed -- fixed memory leak affecting reginal masking. Temporary ESMF field was created but never destroyed +- fixed memory leak affecting regional masking. Temporary ESMF field was created but never destroyed ### Removed