Add reproducer for #356.

2 files changed, 24 insertions, 0 deletions

diff --git a/testsuite/gna/issue356/mux4.vhdl b/testsuite/gna/issue356/mux4.vhdl
new file mode 100644
index 000000000..ed1a1d7f1
--- /dev/null
+++ b/testsuite/gna/issue356/mux4.vhdl
@@ -0,0 +1,14 @@
+entity mux4 is
+        port ( a0, a1, a2, a3 : in bit;
+               sel0, sel1 : in bit;
+               y : out bit );
+end entity mux4;
+
+architecture behav of mux4 is
+begin   
+        with bit_vector'(sel0, sel1) select
+                y <= a0 when "00",
+                     a1 when "01",
+                     a2 when "10",
+                     a3 when "11";
+end architecture behav;
diff --git a/testsuite/gna/issue356/testsuite.sh b/testsuite/gna/issue356/testsuite.sh
new file mode 100755
index 000000000..6ff5342a2
--- /dev/null
+++ b/testsuite/gna/issue356/testsuite.sh
@@ -0,0 +1,10 @@
+#! /bin/sh
+
+. ../../testenv.sh
+
+export GHDL_STD_FLAGS=--std=08
+analyze mux4.vhdl
+
+clean
+
+echo "Test successful"