From: Alan Modra <amodra@gmail.com>
Date: Thu, 31 Aug 2023 09:10:40 +0000 (+0930)
Subject: vms-alpha: Free memory on failure path
X-Git-Tag: gdb-14-branchpoint~378
X-Git-Url: http://git.ipfire.org/?a=commitdiff_plain;h=ad4ee59eb7d3cb3e02823c1ada571632c5b7891e;p=thirdparty%2Fbinutils-gdb.git

vms-alpha: Free memory on failure path

	* vms-alpha.c (evax_bfd_print_eobj): Free rec on failure.
---

diff --git a/bfd/vms-alpha.c b/bfd/vms-alpha.c
index f4d1e009d06..9689dcb8738 100644
--- a/bfd/vms-alpha.c
+++ b/bfd/vms-alpha.c
@@ -6972,6 +6972,7 @@ evax_bfd_print_eobj (struct bfd *abfd, FILE *file)
 	  != pad_len - hdr_size)
 	{
 	  fprintf (file, _("cannot read GST record\n"));
+	  free (rec);
 	  return;
 	}
 
@@ -6987,7 +6988,6 @@ evax_bfd_print_eobj (struct bfd *abfd, FILE *file)
 	  evax_bfd_print_eeom (file, rec, rec_len);
 	  free (rec);
 	  return;
-	  break;
 	case EOBJ__C_ETIR:
 	  evax_bfd_print_etir (file, "ETIR", rec, rec_len);
 	  break;