diff options
author | Tristan Gingold <tgingold@free.fr> | 2023-01-18 20:46:38 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2023-01-20 21:54:34 +0100 |
commit | 79542b1680f1dcd3e746a584ff1bf198f50c8486 (patch) | |
tree | 53ceb6dc1af2af1b2b838ba0e54c90b088f9b5c4 /src/ghdldrv/ghdlsimul.adb | |
parent | 5bae163c99500d2395391a40b55d2c5618eaccd1 (diff) | |
download | ghdl-79542b1680f1dcd3e746a584ff1bf198f50c8486.tar.gz ghdl-79542b1680f1dcd3e746a584ff1bf198f50c8486.tar.bz2 ghdl-79542b1680f1dcd3e746a584ff1bf198f50c8486.zip |
synth: add partial support of foreign subprograms
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 909253e60..a1f315678 100644 --- a/src/ghdldrv/ghdlsimul.adb +++ b/src/ghdldrv/ghdlsimul.adb @@ -52,6 +52,7 @@ with Elab.Debugger; with Synth.Flags; with Synth.Errors; +with Synth.Vhdl_Foreign; with Simul.Vhdl_Elab; with Simul.Vhdl_Simul; @@ -136,6 +137,7 @@ package body Ghdlsimul is -- Set flags. Synth.Flags.Flag_Simulation := True; Synth.Errors.Debug_Handler := Elab.Debugger.Debug_Error'Access; + Synth.Vhdl_Foreign.Initialize; -- Generic overriding. Top := Vhdl.Utils.Get_Entity_From_Configuration (Config); |