+2020-06-27  Alan Modra  <amodra@gmail.com>
+
+       * elfcomm.c (setup_nested_archive): Set nested_arch->file to NULL
+       after freeing.
+       (release_archive): Set fields of arch to NULL after freeing.
+
 2020-06-26  Nick Alcock  <nick.alcock@oracle.com>
 
        * readelf.c (dump_section_as_ctf): Support .ctf archives using
 
 
   /* Close previous file and discard cached information.  */
   if (nested_arch->file != NULL)
-    fclose (nested_arch->file);
+    {
+      fclose (nested_arch->file);
+      nested_arch->file = NULL;
+    }
   release_archive (nested_arch);
 
   member_file = fopen (member_file_name, "rb");
   free (arch->index_array);
   free (arch->sym_table);
   free (arch->longnames);
+  arch->file_name = NULL;
+  arch->index_array = NULL;
+  arch->sym_table = NULL;
+  arch->longnames = NULL;
 }
 
 /* Get the name of an archive member from the current archive header.