diff options
Diffstat (limited to 'gcc/ada/einfo.adb')
-rw-r--r-- | gcc/ada/einfo.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/einfo.adb b/gcc/ada/einfo.adb index 31a90e3542c..c018363eae2 100644 --- a/gcc/ada/einfo.adb +++ b/gcc/ada/einfo.adb @@ -666,7 +666,7 @@ package body Einfo is function Abstract_States (Id : E) return L is begin - pragma Assert (Ekind (Id) = E_Package); + pragma Assert (Ekind_In (Id, E_Generic_Package, E_Package)); return Elist25 (Id); end Abstract_States; |