aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-vhdl_stmts.adb
diff options
context:
space:
mode:
authortmeissner <programming@goodcleanfun.de>2021-10-25 11:56:23 +0200
committerTristan Gingold <tgingold@free.fr>2021-11-02 19:31:25 +0100
commitf911b6b97b379415eb5620d29d4579541bb5facd (patch)
tree18e0f1ef8277c844657086aa2b5bdf4cf56f2fff /src/synth/synth-vhdl_stmts.adb
parent86fd1ab3079b50c5b7234db2cedf3d1e8c0f081b (diff)
downloadghdl-f911b6b97b379415eb5620d29d4579541bb5facd.tar.gz
ghdl-f911b6b97b379415eb5620d29d4579541bb5facd.tar.bz2
ghdl-f911b6b97b379415eb5620d29d4579541bb5facd.zip
synth: Support alias declarations in vunit
Diffstat (limited to 'src/synth/synth-vhdl_stmts.adb')
-rw-r--r--src/synth/synth-vhdl_stmts.adb9
1 files changed, 7 insertions, 2 deletions
diff --git a/src/synth/synth-vhdl_stmts.adb b/src/synth/synth-vhdl_stmts.adb
index 989942244..d26b24f73 100644
--- a/src/synth/synth-vhdl_stmts.adb
+++ b/src/synth/synth-vhdl_stmts.adb
@@ -117,6 +117,7 @@ package body Synth.Vhdl_Stmts is
| Iir_Kind_Constant_Declaration
| Iir_Kind_File_Declaration
| Iir_Kind_Interface_File_Declaration
+ | Iir_Kind_Non_Object_Alias_Declaration
| Iir_Kind_Object_Alias_Declaration =>
declare
Targ : constant Valtyp := Get_Value (Syn_Inst, Pfx);
@@ -3785,7 +3786,9 @@ package body Synth.Vhdl_Stmts is
| Iir_Kind_Function_Body
| Iir_Kind_Procedure_Body
| Iir_Kind_Attribute_Declaration
- | Iir_Kind_Attribute_Specification =>
+ | Iir_Kind_Attribute_Specification
+ | Iir_Kind_Object_Alias_Declaration
+ | Iir_Kind_Non_Object_Alias_Declaration =>
Synth_Concurrent_Declaration (Syn_Inst, Item);
when Iir_Kinds_Concurrent_Signal_Assignment
| Iir_Kinds_Process_Statement
@@ -3827,7 +3830,9 @@ package body Synth.Vhdl_Stmts is
| Iir_Kind_Function_Body
| Iir_Kind_Procedure_Body
| Iir_Kind_Attribute_Declaration
- | Iir_Kind_Attribute_Specification =>
+ | Iir_Kind_Attribute_Specification
+ | Iir_Kind_Object_Alias_Declaration
+ | Iir_Kind_Non_Object_Alias_Declaration =>
Finalize_Declaration (Syn_Inst, Item, False);
when others =>
Error_Kind ("synth_verification_unit(2)", Item);