diff options
| author | Gary Dismukes <dismukes@adacore.com> | 2020-06-16 16:08:34 -0400 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-07-27 04:05:17 -0400 |
| commit | 26ac7446f607b1b031bbd38fab28265fd772f8a5 (patch) | |
| tree | d562fa4a79f260f3d9667921fae948ea54f89c86 /gcc/ada | |
| parent | 84ae33e7f55bc1c183ab907370dc6b967bd9b13a (diff) | |
| download | gcc-26ac7446f607b1b031bbd38fab28265fd772f8a5.zip gcc-26ac7446f607b1b031bbd38fab28265fd772f8a5.tar.gz gcc-26ac7446f607b1b031bbd38fab28265fd772f8a5.tar.bz2 | |
[Ada] AI12-0194: Language-defined aspects and entry bodies
gcc/ada/
* sem_prag.adb (Analyze_Pragma, Pragma_Max_Entry_Queue_Length):
Refine error message to indicate that the pragma must apply to
an entry declaration, not just an entry.
Diffstat (limited to 'gcc/ada')
| -rw-r--r-- | gcc/ada/sem_prag.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb index f7019ca..a8f8987 100644 --- a/gcc/ada/sem_prag.adb +++ b/gcc/ada/sem_prag.adb @@ -19452,7 +19452,8 @@ package body Sem_Prag is -- Otherwise the pragma is associated with an illegal construct else - Error_Pragma ("pragma % must apply to a protected entry"); + Error_Pragma + ("pragma % must apply to a protected entry declaration"); return; end if; |