[Ada] Fix copy-paste mistake in diagnostics for aspect Effective_Writes

gcc/ada/

	* sem_ch13.adb (Analyze_One_Aspect): Replace duplicate of
	Effective_Reads.
This commit is contained in:
Piotr Trojanek 2020-10-15 00:13:51 +02:00 committed by Pierre-Marie de Rodat
parent ad26cae122
commit a79039c0eb

View File

@ -2849,7 +2849,7 @@ package body Sem_Ch13 is
or else A_Id = Aspect_Async_Readers
or else A_Id = Aspect_Async_Writers
or else A_Id = Aspect_Effective_Reads
or else A_Id = Aspect_Effective_Reads
or else A_Id = Aspect_Effective_Writes
then
Error_Msg_Name_1 := Nam;
@ -2882,7 +2882,7 @@ package body Sem_Ch13 is
and then A_Id /= Aspect_Async_Readers
and then A_Id /= Aspect_Async_Writers
and then A_Id /= Aspect_Effective_Reads
and then A_Id /= Aspect_Effective_Reads
and then A_Id /= Aspect_Effective_Writes
then
Error_Msg_N
("aspect % not allowed for formal type declaration",