Add reproducer for issue #158

2 files changed, 32 insertions, 0 deletions

diff --git a/testsuite/gna/issue158/repro.vhdl b/testsuite/gna/issue158/repro.vhdl
new file mode 100644
index 000000000..ce7cd4180
--- /dev/null
+++ b/testsuite/gna/issue158/repro.vhdl
@@ -0,0 +1,19 @@
+entity repro is
+end repro;
+
+architecture behav of repro is
+begin
+  Genf: for i in 1 to 2 generate
+  begin
+     blk : block
+     begin
+     end block;
+  end generate;
+
+  geni : if true generate
+  begin
+     blk : block
+     begin
+     end block;
+  end generate;
+end behav;
diff --git a/testsuite/gna/issue158/testsuite.sh b/testsuite/gna/issue158/testsuite.sh
new file mode 100755
index 000000000..cc3b19ef5
--- /dev/null
+++ b/testsuite/gna/issue158/testsuite.sh
@@ -0,0 +1,13 @@
+#! /bin/sh
+
+. ../../testenv.sh
+
+analyze repro.vhdl
+if ghdl_has_feature repro ghw; then
+  elab_simulate repro --wave=repro.ghw
+  # How to test the ghw ?  Use ghwdump ?
+fi
+clean
+rm -f repro.ghw
+
+echo "Test successful"