aboutsummaryrefslogtreecommitdiffstats
path: root/sem_names.adb
diff options
context:
space:
mode:
Diffstat (limited to 'sem_names.adb')
-rw-r--r--sem_names.adb7
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);