1 files changed, 19 insertions, 0 deletions
diff --git a/testsuite/gna/issue2104/e2d.vhdl b/testsuite/gna/issue2104/e2d.vhdl
new file mode 100644
index 000000000..0b541fc47
--- /dev/null
+++ b/testsuite/gna/issue2104/e2d.vhdl
@@ -0,0 +1,19 @@
+entity e2d is
+  generic (gen1 : natural := 5);
+end;
+
+architecture a of e2d is
+    function outer(arg : integer) return integer is
+        function inner1(arg : integer) return integer is
+        begin
+            return arg + 1;
+        end;
+        function inner2(arg : integer) return integer is
+        begin
+            return inner1(arg + 2);
+        end;
+    begin
+        return gen1 + inner2(arg + 3);
+    end;
+begin
+end;