diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-07-02 18:53:46 +0200 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-07-02 18:53:46 +0200 |
commit | 078c1ac07afa3d07a399fc88058cba11722a0100 (patch) | |
tree | 4a973ac73e6e04442adb0f41c4914320a1d3e2c7 /src | |
parent | 99c5fecec91d481139a3108dd3e7b53158a002c2 (diff) | |
download | ghdl-078c1ac07afa3d07a399fc88058cba11722a0100.tar.gz ghdl-078c1ac07afa3d07a399fc88058cba11722a0100.tar.bz2 ghdl-078c1ac07afa3d07a399fc88058cba11722a0100.zip |
synth: do not support signals declared in a package.
Diffstat (limited to 'src')
-rw-r--r-- | src/synth/synth-decls.adb | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/src/synth/synth-decls.adb b/src/synth/synth-decls.adb index 6a1ede30c..7c6f7a107 100644 --- a/src/synth/synth-decls.adb +++ b/src/synth/synth-decls.adb @@ -902,6 +902,11 @@ package body Synth.Decls is Init : Valtyp; Obj_Typ : Type_Acc; begin + if Get_Kind (Get_Parent (Decl)) = Iir_Kind_Package_Declaration then + Error_Msg_Synth (+Decl, "signals in packages are not supported"); + return; + end if; + Synth_Declaration_Type (Syn_Inst, Decl); Create_Wire_Object (Syn_Inst, Wire_Signal, Decl); if Is_Valid (Def) then |