From 302563cf1ba92b0872341f5064260d6799e9e963 Mon Sep 17 00:00:00 2001
From: Gary Dismukes <dismukes@adacore.com>
Date: Wed, 11 Aug 2021 18:41:28 -0400
Subject: [PATCH] [Ada] Spurious warning about hiding in generic instantiation

gcc/ada/

	* sem_util.adb (Enter_Name): Suppress hiding warning when in an
	instance.
---
 gcc/ada/sem_util.adb | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb
index 98e687791071..0c0d34ba6b0c 100644
--- a/gcc/ada/sem_util.adb
+++ b/gcc/ada/sem_util.adb
@@ -8656,6 +8656,10 @@ package body Sem_Util is
         and then Comes_From_Source (C)
         and then Comes_From_Source (Def_Id)
 
+        --  Don't warn within a generic instantiation
+
+        and then not In_Instance
+
         --  Don't warn unless entity in question is in extended main source
 
         and then In_Extended_Main_Source_Unit (Def_Id)
-- 
2.47.2