diff options
| author | Tristan Gingold <tgingold@free.fr> | 2023-01-07 19:03:54 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2023-01-09 06:40:17 +0100 |
| commit | d51d0111c4ce057fd30b03370249dac8ac61f627 (patch) | |
| tree | 8979915eeaa6b1481fe24ad9aa63307c04a17d49 | |
| parent | db271398f8240f64fc33bec4157d755e4c6327c7 (diff) | |
| download | ghdl-d51d0111c4ce057fd30b03370249dac8ac61f627.tar.gz ghdl-d51d0111c4ce057fd30b03370249dac8ac61f627.tar.bz2 ghdl-d51d0111c4ce057fd30b03370249dac8ac61f627.zip | |
synth: handle stop/finish without status
| -rw-r--r-- | src/synth/synth-vhdl_static_proc.adb | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/src/synth/synth-vhdl_static_proc.adb b/src/synth/synth-vhdl_static_proc.adb index d968a8631..fdc33b121 100644 --- a/src/synth/synth-vhdl_static_proc.adb +++ b/src/synth/synth-vhdl_static_proc.adb @@ -100,7 +100,9 @@ package body Synth.Vhdl_Static_Proc is when Iir_Predefined_Flush => Synth_File_Flush (Syn_Inst, Imp, Loc); when Iir_Predefined_Std_Env_Finish_Status - | Iir_Predefined_Std_Env_Stop_Status => + | Iir_Predefined_Std_Env_Stop_Status + | Iir_Predefined_Std_Env_Finish + | Iir_Predefined_Std_Env_Stop => if Hook_Finish /= null then Hook_Finish.all (Syn_Inst, Imp); else |