Update test_bitmap.F90

NOAA-EMC · Nov 15, 2024 · 867e553 · 867e553
1 parent d718e8e
commit 867e553
Showing 1 changed file with 3 additions and 3 deletions.
diff --git a/tests/test_bitmap.F90 b/tests/test_bitmap.F90
@@ -82,9 +82,9 @@ end subroutine g2_create_index
   if (iret .ne. 0) stop 101
 
   ! Free resources.
-  !call gf_free(gfld)
-  !call gf_finalize(iret)
-  !if (iret .ne. 0) stop 102
+  call gf_free(gfld)
+  call gf_finalize(iret)
+  if (iret .ne. 0) stop 102
 
   print *, 'SUCCESS!'
 end program test_bitmap