From 44ef5328fbae25ac727ddeedae1ca03ff1b47d08 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 6 Apr 2019 16:09:32 +0200
Subject: vhdl: handle interface procedure for purity checks.  Fix #791

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

diff --git a/src/vhdl/sem_expr.adb b/src/vhdl/sem_expr.adb
index 1aeaf0e2d..e26739bde 100644
--- a/src/vhdl/sem_expr.adb
+++ b/src/vhdl/sem_expr.adb
@@ -1031,6 +1031,9 @@ package body Sem_Expr is
                      Error_Kind ("sem_call_purity_check(2)", Subprg);
                end case;
             end;
+         when Iir_Kind_Interface_Procedure_Declaration =>
+            --  We have no idea about this procedure.
+            null;
          when others =>
             Error_Kind ("sem_call_purity_check", Callee);
       end case;
-- 
cgit v1.2.3