diff options
Diffstat (limited to 'gcc/ada/sem_util.adb')
| -rw-r--r-- | gcc/ada/sem_util.adb | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gcc/ada/sem_util.adb b/gcc/ada/sem_util.adb index 83c3f4b21f2..82dca5662a3 100644 --- a/gcc/ada/sem_util.adb +++ b/gcc/ada/sem_util.adb @@ -8053,7 +8053,7 @@ package body Sem_Util is return Object_Access_Level (Expression (Obj)); -- Function results are objects, so we get either the access level of - -- the function or, in the case of an indirect call, the level of of the + -- the function or, in the case of an indirect call, the level of the -- access-to-subprogram type. elsif Nkind (Obj) = N_Function_Call then |