diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-08-21 16:01:45 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-08-21 16:01:45 +0200 |
| commit | 2ed9d9b2fec19dec5f65dcc9df7a9577c489464f (patch) | |
| tree | 10efe12a69b4008c71e54538dcf2dcf0385c55ab | |
| parent | 9ddb1ad66ca52b16379dad59d1a4665e69183b4c (diff) | |
| download | ghdl-2ed9d9b2fec19dec5f65dcc9df7a9577c489464f.tar.gz ghdl-2ed9d9b2fec19dec5f65dcc9df7a9577c489464f.tar.bz2 ghdl-2ed9d9b2fec19dec5f65dcc9df7a9577c489464f.zip | |
synth-vhdl_static_proc: handle std.env.finish
| -rw-r--r-- | src/synth/synth-vhdl_static_proc.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/src/synth/synth-vhdl_static_proc.adb b/src/synth/synth-vhdl_static_proc.adb index 9144d5061..330d76599 100644 --- a/src/synth/synth-vhdl_static_proc.adb +++ b/src/synth/synth-vhdl_static_proc.adb @@ -96,7 +96,8 @@ package body Synth.Vhdl_Static_Proc is Synth_File_Write (Syn_Inst, Imp, Loc); when Iir_Predefined_Flush => Synth_File_Flush (Syn_Inst, Imp, Loc); - when Iir_Predefined_Std_Env_Finish_Status => + when Iir_Predefined_Std_Env_Finish_Status + | Iir_Predefined_Std_Env_Stop_Status => if Hook_Finish /= null then Hook_Finish.all (Syn_Inst, Imp); else |