Commit 7ae795f7 by Piotr Trojanek Committed by Pierre-Marie de Rodat

[Ada] Simplify call to Unique_Defining_Entity on protected entry declarations

Calling Unique_Defining_Entity on protectected entry declarations is
equivalent to calling a simpler Defining_Entity; use the simpler routine.

Simplification only; semantics unaffected, so no test provided.

2018-05-31  Piotr Trojanek  <trojanek@adacore.com>

gcc/ada/

	* sem_prag.adb (Analyze_Pragma): Replace call to Unique_Defining_Entity
	with a semantically equivalent call to Defining_Entity.

From-SVN: r261003
parent 7366d29a
2018-05-31 Piotr Trojanek <trojanek@adacore.com> 2018-05-31 Piotr Trojanek <trojanek@adacore.com>
* sem_prag.adb (Analyze_Pragma): Replace call to Unique_Defining_Entity
with a semantically equivalent call to Defining_Entity.
2018-05-31 Piotr Trojanek <trojanek@adacore.com>
* sem_prag.adb (Analyze_Pragma): Set Etype on the rewritten * sem_prag.adb (Analyze_Pragma): Set Etype on the rewritten
Max_Queue_Length expression. Max_Queue_Length expression.
......
...@@ -18795,7 +18795,7 @@ package body Sem_Prag is ...@@ -18795,7 +18795,7 @@ package body Sem_Prag is
return; return;
end if; end if;
Entry_Id := Unique_Defining_Entity (Entry_Decl); Entry_Id := Defining_Entity (Entry_Decl);
-- Otherwise the pragma is associated with an illegal construct -- Otherwise the pragma is associated with an illegal construct
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment