diff options
Diffstat (limited to 'gcc/ada/sem_dim.adb')
| -rw-r--r-- | gcc/ada/sem_dim.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/gcc/ada/sem_dim.adb b/gcc/ada/sem_dim.adb index 8e65d22..4ba81f8 100644 --- a/gcc/ada/sem_dim.adb +++ b/gcc/ada/sem_dim.adb @@ -2499,6 +2499,8 @@ package body Sem_Dim is -- Is_Dim_IO_Package_Entity -- ------------------------------ + -- Why all this comparison of names, why not use Is_RTE and Is_RTU ??? + function Is_Dim_IO_Package_Entity (E : Entity_Id) return Boolean is begin -- Check the package entity is standard and its scope is either |