[Ada] Remove redundant marking of illegal pragma with error posted
authorPiotr Trojanek <trojanek@adacore.com>
Sat, 16 Apr 2022 12:38:54 +0000 (14:38 +0200)
committerPierre-Marie de Rodat <derodat@adacore.com>
Thu, 19 May 2022 14:05:32 +0000 (14:05 +0000)
commit0d9583573b7fbb4ee3fc769f962dfdde8684d795
tree3f7847b93c28fad28799f6b770fba926284c8946
parenteac0a28825a82b914fc319a3827a1b89e577f1b9
[Ada] Remove redundant marking of illegal pragma with error posted

We flag illegal pragma Elaborate with a call to Error_Msg on the pragma
argument, which in turn calls Set_Error_Posted on the enclosing
statement, i.e. on the pragma itself. The explicit call to
Set_Error_Posted on the pragma itself was redundant.

Cleanup related to handling of illegal code when detecting uninitialized
scalar objects.

gcc/ada/

* sem_prag.adb (Analyze_Pragma): Remove redundant call to
Set_Error_Posted.
gcc/ada/sem_prag.adb