aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2019-10-09 20:24:42 +0200
committerTristan Gingold <tgingold@free.fr>2019-10-09 20:24:42 +0200
commitde633f9ea2524d7a1e1339ea27bf09be6abdddec (patch)
tree2d6b082f0eff775e5d274b9f85d6af6f4a7011e9
parenta1d8c53e1cba26c14f64d8951b2117dda1fa4d25 (diff)
downloadghdl-de633f9ea2524d7a1e1339ea27bf09be6abdddec.tar.gz
ghdl-de633f9ea2524d7a1e1339ea27bf09be6abdddec.tar.bz2
ghdl-de633f9ea2524d7a1e1339ea27bf09be6abdddec.zip
synth: set location on instances.
-rw-r--r--src/synth/synth-insts.adb1
1 files changed, 1 insertions, 0 deletions
diff --git a/src/synth/synth-insts.adb b/src/synth/synth-insts.adb
index f29ecea07..c0d40a2ea 100644
--- a/src/synth/synth-insts.adb
+++ b/src/synth/synth-insts.adb
@@ -404,6 +404,7 @@ package body Synth.Insts is
Inst := New_Instance (Get_Instance_Module (Syn_Inst),
Inst_Obj.M,
New_Sname_User (Get_Identifier (Stmt)));
+ Set_Location (Inst, Stmt);
Synth_Instantiate_Module
(Syn_Inst, Inst, Inst_Obj, Get_Port_Map_Aspect_Chain (Stmt));