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