diff options
Diffstat (limited to 'src/synth')
| -rw-r--r-- | src/synth/elab-vhdl_insts.adb | 3 | ||||
| -rw-r--r-- | src/synth/synth-vhdl_decls.adb | 3 |
2 files changed, 4 insertions, 2 deletions
diff --git a/src/synth/elab-vhdl_insts.adb b/src/synth/elab-vhdl_insts.adb index 5192046b1..cb7a6bd9e 100644 --- a/src/synth/elab-vhdl_insts.adb +++ b/src/synth/elab-vhdl_insts.adb @@ -183,7 +183,8 @@ package body Elab.Vhdl_Insts is if Bod /= Null_Node then -- Macro expanded package instantiation. - raise Internal_Error; + Elab_Declarations + (Sub_Inst, Get_Declaration_Chain (Bod)); else -- Shared body declare 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 |