aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/gna/issue2103/repro3.vhdl
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/gna/issue2103/repro3.vhdl')
-rw-r--r--testsuite/gna/issue2103/repro3.vhdl13
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/gna/issue2103/repro3.vhdl b/testsuite/gna/issue2103/repro3.vhdl
new file mode 100644
index 000000000..9150c27eb
--- /dev/null
+++ b/testsuite/gna/issue2103/repro3.vhdl
@@ -0,0 +1,13 @@
+package repro3 is
+ constant a1 : natural := 1;
+ constant a2 : natural := 1;
+
+ function f (arg : bit; length : string (1 to a1)) return bit;
+end;
+
+package body repro3 is
+ function f (arg : bit; length : string (1 to a2)) return bit is
+ begin
+ return arg;
+ end;
+end;