diff options
| author | Tristan Gingold <tgingold@free.fr> | 2022-04-29 12:20:53 +0200 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2022-04-29 12:20:53 +0200 |
| commit | b1fea164a817977f8417175bdb98fbc925baf4ab (patch) | |
| tree | 6e6b8ce7aa038dcd8f4e13ab093a2ed7f2e6011a | |
| parent | d9b5e0e8e2de7d575df18fcc7be84a8ba8375052 (diff) | |
| download | ghdl-b1fea164a817977f8417175bdb98fbc925baf4ab.tar.gz ghdl-b1fea164a817977f8417175bdb98fbc925baf4ab.tar.bz2 ghdl-b1fea164a817977f8417175bdb98fbc925baf4ab.zip | |
elab-vhdl_types: do not crash on signal resolver
| -rw-r--r-- | src/synth/elab-vhdl_types.adb | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/src/synth/elab-vhdl_types.adb b/src/synth/elab-vhdl_types.adb index 09fbb11da..ca38e840b 100644 --- a/src/synth/elab-vhdl_types.adb +++ b/src/synth/elab-vhdl_types.adb @@ -530,6 +530,9 @@ package body Elab.Vhdl_Types is else raise Internal_Error; end if; + when Type_Vector => + -- An alias with just a different resolver ? + return Parent_Typ; when others => raise Internal_Error; end case; |