From ed5fdc7c5fee59ad06d3eed78c7505fc22009f95 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Wed, 27 Jan 2016 05:58:56 +0100
Subject: simul: preliminary work for environments.

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

(limited to 'src/vhdl/simulate/elaboration.adb')

diff --git a/src/vhdl/simulate/elaboration.adb b/src/vhdl/simulate/elaboration.adb
index 739bf02df..1ad2e02b5 100644
--- a/src/vhdl/simulate/elaboration.adb
+++ b/src/vhdl/simulate/elaboration.adb
@@ -95,7 +95,8 @@ package body Elaboration is
               | Iir_Value_Access
               | Iir_Value_Protected
               | Iir_Value_Quantity
-              | Iir_Value_Terminal =>
+              | Iir_Value_Terminal
+              | Iir_Value_Environment =>
                raise Internal_Error;
          end case;
          return Res;
-- 
cgit v1.2.3