From: Stefan Schulze Frielinghaus <stefansf@linux.ibm.com>
Date: Wed, 3 Nov 2021 08:39:27 +0000 (+0100)
Subject: IBM Z: Free bbs in s390_loop_unroll_adjust
X-Git-Tag: basepoints/gcc-13~3455
X-Git-Url: http://git.ipfire.org/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=ea2ab805acdd023f1c43302723c1fa1349be9cca;p=thirdparty%2Fgcc.git

IBM Z: Free bbs in s390_loop_unroll_adjust

gcc/ChangeLog:

	* config/s390/s390.c (s390_loop_unroll_adjust): In case of early
	exit free bbs.
---

diff --git a/gcc/config/s390/s390.c b/gcc/config/s390/s390.c
index b2f2f6417b39..510e7f58a3b8 100644
--- a/gcc/config/s390/s390.c
+++ b/gcc/config/s390/s390.c
@@ -15400,7 +15400,10 @@ s390_loop_unroll_adjust (unsigned nunroll, struct loop *loop)
 		  || (GET_CODE (SET_SRC (set)) == COMPARE
 		      && GET_MODE (XEXP (SET_SRC (set), 0)) == BLKmode
 		      && GET_MODE (XEXP (SET_SRC (set), 1)) == BLKmode)))
-	    return 1;
+	    {
+	      free (bbs);
+	      return 1;
+	    }
 
 	  FOR_EACH_SUBRTX (iter, array, PATTERN (insn), NONCONST)
 	    if (MEM_P (*iter))