diff options
author | Tristan Gingold <tgingold@free.fr> | 2020-03-22 19:36:44 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2020-03-22 19:36:44 +0100 |
commit | 0cd37c83c170b5292b5ec9800013da6b4f63c1c1 (patch) | |
tree | 3b8a1df5451df80e2da3d630eb8621dedbcd1d18 /src/synth/netlists-disp_vhdl.adb | |
parent | 902d81ad69bb66a9515d09270c10d0f7ea167d25 (diff) | |
download | ghdl-0cd37c83c170b5292b5ec9800013da6b4f63c1c1.tar.gz ghdl-0cd37c83c170b5292b5ec9800013da6b4f63c1c1.tar.bz2 ghdl-0cd37c83c170b5292b5ec9800013da6b4f63c1c1.zip |
synth-disp_vhdl: do not wrap inout ports. For #1166
Diffstat (limited to 'src/synth/netlists-disp_vhdl.adb')
-rw-r--r-- | src/synth/netlists-disp_vhdl.adb | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/src/synth/netlists-disp_vhdl.adb b/src/synth/netlists-disp_vhdl.adb index f4e8e49f7..99a87d2f4 100644 --- a/src/synth/netlists-disp_vhdl.adb +++ b/src/synth/netlists-disp_vhdl.adb @@ -1297,6 +1297,8 @@ package body Netlists.Disp_Vhdl is Put ("in"); when Port_Out => Put ("out"); + when Port_Inout => + raise Internal_Error; end case; Put (' '); Put_Type (Desc.W); |