From 54503976a4e2241fea70c4d37d12fd85f06eaf59 Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Sat, 14 May 2022 19:47:58 +0200
Subject: elab-vhdl_stmts: change parent of generate_body for for-generate

---
 src/synth/elab-vhdl_stmts.adb | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/synth/elab-vhdl_stmts.adb b/src/synth/elab-vhdl_stmts.adb
index d3667b0e4..0deb80b5a 100644
--- a/src/synth/elab-vhdl_stmts.adb
+++ b/src/synth/elab-vhdl_stmts.adb
@@ -107,7 +107,7 @@ package body Elab.Vhdl_Stmts is
          Ival := Create_Value_Discrete (Read_Discrete (Val), It_Rng);
 
          Sub_Inst := Elab_Generate_Statement_Body
-           (Syn_Inst, Bod, Config, Iterator, Ival);
+           (Gen_Inst, Bod, Config, Iterator, Ival);
          Set_Generate_Sub_Instance (Gen_Inst, Positive (I), Sub_Inst);
 
          Update_Index (It_Rng.Drange, Val);
-- 
cgit v1.2.3