diff options
Diffstat (limited to 'sem_names.adb')
| -rw-r--r-- | sem_names.adb | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/sem_names.adb b/sem_names.adb index f56dabcb6..31de9a8d5 100644 --- a/sem_names.adb +++ b/sem_names.adb @@ -1998,6 +1998,13 @@ package body Sem_Names is when Iir_Kinds_Function_Declaration => Sem_Parenthesis_Function (Prefix); if Res = Null_Iir then + declare + Match : Boolean; + begin + Sem_Association_Chain + (Get_Interface_Declaration_Chain (Prefix), + Assoc_Chain, True, Missing_Parameter, Name, Match); + end; Error_Msg_Sem ("prefix is neither a function name " & "nor can it be sliced or indexed", Name); |
