From 1433fe496f76df04732614de9dc4868e482eaf10 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 12 Nov 2016 07:23:05 +0100
Subject: improve error message for a procedure call within an expression.

---
 src/vhdl/sem_names.adb | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/src/vhdl/sem_names.adb b/src/vhdl/sem_names.adb
index 26672b385..df7fdf636 100644
--- a/src/vhdl/sem_names.adb
+++ b/src/vhdl/sem_names.adb
@@ -2645,7 +2645,8 @@ package body Sem_Names is
 
          when Iir_Kind_Procedure_Declaration
            | Iir_Kind_Interface_Procedure_Declaration =>
-            Error_Msg_Sem (+Name, "function name is a procedure");
+            Error_Msg_Sem (+Name, "cannot call %n in an expression",
+                           +Prefix);
 
          when Iir_Kinds_Process_Statement
            | Iir_Kind_Component_Declaration
-- 
cgit v1.2.3