aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-vhdl_decls.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2022-01-14 06:24:33 +0100
committerTristan Gingold <tgingold@free.fr>2022-01-14 06:24:33 +0100
commit1b3915222c3755692ae1693ef1bb8f9d3dc52172 (patch)
tree799779b4f9b35d9f4faa4046786ee7dec5f91b58 /src/synth/synth-vhdl_decls.adb
parent4b97bbb1830f10ec17e07c5d312e35a83019a9ce (diff)
downloadghdl-1b3915222c3755692ae1693ef1bb8f9d3dc52172.tar.gz
ghdl-1b3915222c3755692ae1693ef1bb8f9d3dc52172.tar.bz2
ghdl-1b3915222c3755692ae1693ef1bb8f9d3dc52172.zip
synth: handle macro-expanded package body. Fix #1948
Diffstat (limited to 'src/synth/synth-vhdl_decls.adb')
-rw-r--r--src/synth/synth-vhdl_decls.adb3
1 files changed, 2 insertions, 1 deletions
diff --git a/src/synth/synth-vhdl_decls.adb b/src/synth/synth-vhdl_decls.adb
index 5eefbdaef..c7ab62d8e 100644
--- a/src/synth/synth-vhdl_decls.adb
+++ b/src/synth/synth-vhdl_decls.adb
@@ -341,7 +341,8 @@ package body Synth.Vhdl_Decls is
if Bod /= Null_Node then
-- Macro expanded package instantiation.
- raise Internal_Error;
+ Synth_Concurrent_Declarations
+ (Sub_Inst, Get_Declaration_Chain (Bod));
else
-- Shared body
declare