Add reproducer for #606

1 files changed, 17 insertions, 0 deletions

diff --git a/testsuite/gna/issue606/repro1b.vhdl b/testsuite/gna/issue606/repro1b.vhdl
new file mode 100644
index 000000000..6e6814bbb
--- /dev/null
+++ b/testsuite/gna/issue606/repro1b.vhdl
@@ -0,0 +1,17 @@
+entity repro1b is
+  generic (depth : natural);
+end repro1b;
+
+architecture behav of repro1b is
+  component repro1a is
+    generic (depth : natural);
+  end component;
+begin
+  assert false report "repro1b: depth = " & natural'image (depth)
+    severity note;
+
+  g : if depth > 0 generate
+    comp1b : repro1a
+      generic map (depth => depth - 1);
+  end generate;
+end behav;