diff options
Diffstat (limited to 'src/ghdldrv/ghdlsimul.adb')
-rw-r--r-- | src/ghdldrv/ghdlsimul.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/ghdldrv/ghdlsimul.adb b/src/ghdldrv/ghdlsimul.adb index 6a6140cee..0a752dc22 100644 --- a/src/ghdldrv/ghdlsimul.adb +++ b/src/ghdldrv/ghdlsimul.adb @@ -47,6 +47,7 @@ with Elab.Vhdl_Insts; with Elab.Debugger; with Synth.Flags; +with Synth.Errors; with Simul.Vhdl_Elab; with Simul.Vhdl_Simul; @@ -88,6 +89,7 @@ package body Ghdlsimul is end loop; Synth.Flags.Flag_Simulation := True; + Synth.Errors.Debug_Handler := Elab.Debugger.Debug_Error'Access; Lib_Unit := Get_Library_Unit (Config); pragma Assert (Get_Kind (Lib_Unit) /= Iir_Kind_Foreign_Module); |