diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-08-21 10:39:12 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-08-21 10:39:12 +0200 |
| commit | 61665a183e94cf8edaebb336c34df24a02ef45fd (patch) | |
| tree | 27a723c64906a5f7293e47e9cb27c62ca3b33574 /src/synth/elab-debugger.adb | |
| parent | 068988b5f9132ae11ee65ca75ac6e56bc8f2f530 (diff) | |
| download | ghdl-61665a183e94cf8edaebb336c34df24a02ef45fd.tar.gz ghdl-61665a183e94cf8edaebb336c34df24a02ef45fd.tar.bz2 ghdl-61665a183e94cf8edaebb336c34df24a02ef45fd.zip | |
simul: rework assertions execution and error handling
Diffstat (limited to 'src/synth/elab-debugger.adb')
| -rw-r--r-- | src/synth/elab-debugger.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/synth/elab-debugger.adb b/src/synth/elab-debugger.adb index f1138904f..0f5ecb9dc 100644 --- a/src/synth/elab-debugger.adb +++ b/src/synth/elab-debugger.adb @@ -1041,6 +1041,9 @@ package body Elab.Debugger is Current_Loc := Expr; Debug (Reason_Error); end if; + if Error_Hook /= null then + Error_Hook.all; + end if; end Debug_Error; end Elab.Debugger; |