From 77eb8c649d6dff15e63e2ea71a4a1b513a4be844 Mon Sep 17 00:00:00 2001
From: Ghjuvan Lacambre <lacambre@adacore.com>
Date: Tue, 2 Nov 2021 11:32:24 +0100
Subject: [PATCH] [Ada] Fix Codepeer warning

gcc/ada/

	* freeze.adb (Check_Inherited_Conditions): Initialize
	Ifaces_List.
---
 gcc/ada/freeze.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/gcc/ada/freeze.adb b/gcc/ada/freeze.adb
index 726e20073fc7..4d0995669028 100644
--- a/gcc/ada/freeze.adb
+++ b/gcc/ada/freeze.adb
@@ -1791,7 +1791,7 @@ package body Freeze is
          return Result;
       end Needs_Wrapper;
 
-      Ifaces_List    : Elist_Id;
+      Ifaces_List    : Elist_Id := No_Elist;
       Ifaces_Listed  : Boolean := False;
       --  Cache the list of interface operations inherited by R
 
-- 
2.47.2