From ee8fdad2bd5d1c18958a89f2f16ebce22f4b858b Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Thu, 16 Jan 2020 18:31:00 +0100
Subject: synth: handle deferred constants. Fix #1096

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

(limited to 'src/vhdl')

diff --git a/src/vhdl/vhdl-annotations.adb b/src/vhdl/vhdl-annotations.adb
index 6a4591430..cf7659a22 100644
--- a/src/vhdl/vhdl-annotations.adb
+++ b/src/vhdl/vhdl-annotations.adb
@@ -756,6 +756,9 @@ package body Vhdl.Annotations is
                --  declaration.
                Annotate_Declaration_Type (Block_Info, Decl);
                Create_Object_Info (Block_Info, Decl);
+            elsif Flag_Synthesis then
+               --  Always create the slot for the subtype.
+               Annotate_Declaration_Type (Block_Info, Decl);
             end if;
 
          when Iir_Kind_File_Declaration =>
-- 
cgit v1.2.3