1 files changed, 5 insertions, 0 deletions
diff --git a/src/synth/synth-insts.adb b/src/synth/synth-insts.adb
index 19d51e997..d2f5aea23 100644
--- a/src/synth/synth-insts.adb
+++ b/src/synth/synth-insts.adb
@@ -45,6 +45,7 @@ with Synth.Stmts; use Synth.Stmts;
 with Synth.Decls; use Synth.Decls;
 with Synth.Expr; use Synth.Expr;
 with Synth.Source; use Synth.Source;
+with Synth.Debugger;
 
 package body Synth.Insts is
    Root_Instance : Synth_Instance_Acc;
@@ -960,6 +961,10 @@ package body Synth.Insts is
    begin
       Root_Instance := Global_Instance;
 
+      if Flags.Flag_Debug_Init then
+         Synth.Debugger.Debug_Init;
+      end if;
+
       --  Dependencies first.
       Synth_Dependencies (Global_Instance, Get_Design_Unit (Entity));
       Synth_Dependencies (Global_Instance, Get_Design_Unit (Arch));