diff options
-rw-r--r-- | gcc/ada/sem_prag.adb | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/gcc/ada/sem_prag.adb b/gcc/ada/sem_prag.adb index 0febc44..b1e4439 100644 --- a/gcc/ada/sem_prag.adb +++ b/gcc/ada/sem_prag.adb @@ -13370,6 +13370,11 @@ package body Sem_Prag is return; end if; + -- Entry + + elsif Nkind (Subp_Decl) = N_Entry_Declaration then + null; + else Pragma_Misplaced; end if; |