aboutsummaryrefslogtreecommitdiffstats
path: root/src/synth/synth-vhdl_decls.adb
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2022-12-27 08:53:00 +0100
committerTristan Gingold <tgingold@free.fr>2022-12-31 13:54:49 +0100
commitb7a9e4b9b5ac2c195da6f3549dd06b5c6e999a0f (patch)
treeab341f364e81544b1445d262708df16300198aa8 /src/synth/synth-vhdl_decls.adb
parentd6343a0bf74d25973c5ed170b8e037b42bd08a7f (diff)
downloadghdl-b7a9e4b9b5ac2c195da6f3549dd06b5c6e999a0f.tar.gz
ghdl-b7a9e4b9b5ac2c195da6f3549dd06b5c6e999a0f.tar.bz2
ghdl-b7a9e4b9b5ac2c195da6f3549dd06b5c6e999a0f.zip
synth: add statement in context, adjust path/instance name attributes
Diffstat (limited to 'src/synth/synth-vhdl_decls.adb')
-rw-r--r--src/synth/synth-vhdl_decls.adb2
1 files changed, 1 insertions, 1 deletions
diff --git a/src/synth/synth-vhdl_decls.adb b/src/synth/synth-vhdl_decls.adb
index de10c01b6..fd0e9b5f5 100644
--- a/src/synth/synth-vhdl_decls.adb
+++ b/src/synth/synth-vhdl_decls.adb
@@ -407,7 +407,7 @@ package body Synth.Vhdl_Decls is
Res : Valtyp;
begin
Parent := Get_Instance_By_Scope (Inst, Get_Parent_Scope (Bod));
- Obj_Inst := Make_Elab_Instance (Parent, Bod, Null_Node);
+ Obj_Inst := Make_Elab_Instance (Parent, Decl, Bod, Null_Node);
Obj_Hand := Elab.Vhdl_Prot.Create (Obj_Inst);
Instance_Pool := Global_Pool'Access;