diff options
| author | Tristan Gingold <tgingold@free.fr> | 2021-04-05 09:20:04 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2021-04-05 10:47:39 +0200 |
| commit | 3c9c6023c38ed1272634a7d2aed5dbe1c318842a (patch) | |
| tree | 9b0c80f87645a14fbcea51e05ecccaeb02ca6aeb /src/synth | |
| parent | f3e936f0ca532fb57f2700a46ba1ff84557f7305 (diff) | |
| download | ghdl-3c9c6023c38ed1272634a7d2aed5dbe1c318842a.tar.gz ghdl-3c9c6023c38ed1272634a7d2aed5dbe1c318842a.tar.bz2 ghdl-3c9c6023c38ed1272634a7d2aed5dbe1c318842a.zip | |
vhdl and libraries: add support for binding to a foreign module
Diffstat (limited to 'src/synth')
| -rw-r--r-- | src/synth/synth-insts.adb | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/synth/synth-insts.adb b/src/synth/synth-insts.adb index 1f399a6ee..5937a793e 100644 --- a/src/synth/synth-insts.adb +++ b/src/synth/synth-insts.adb @@ -1269,6 +1269,11 @@ package body Synth.Insts is ("Synth_Component_Instantiation_Statement(2)", Aspect); end case; + if Get_Kind (Ent) = Iir_Kind_Foreign_Module then + -- TODO. + raise Internal_Error; + end if; + if Arch = Null_Node then Arch := Libraries.Get_Latest_Architecture (Ent); else |