diff options
Diffstat (limited to 'testsuite/gna/issue787/ent.vhdl')
-rw-r--r-- | testsuite/gna/issue787/ent.vhdl | 15 |
1 files changed, 15 insertions, 0 deletions
diff --git a/testsuite/gna/issue787/ent.vhdl b/testsuite/gna/issue787/ent.vhdl new file mode 100644 index 000000000..db7063d18 --- /dev/null +++ b/testsuite/gna/issue787/ent.vhdl @@ -0,0 +1,15 @@ +entity ent is +end ent; + +architecture a of ent is + signal sig_x : bit; + signal sig_y : bit; + + signal sig_z : bit_vector(1 downto 0); +begin + -- works + -- (sig_x, sig_y) <= sig_z; + + -- "raised TYPES.INTERNAL_ERROR : trans.adb:619" + (sig_x, sig_y) <= not sig_z; +end a; |