aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/gna/issue316
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/gna/issue316')
-rw-r--r--testsuite/gna/issue316/gen_pkg.vhdl13
-rwxr-xr-xtestsuite/gna/issue316/testsuite.sh10
2 files changed, 23 insertions, 0 deletions
diff --git a/testsuite/gna/issue316/gen_pkg.vhdl b/testsuite/gna/issue316/gen_pkg.vhdl
new file mode 100644
index 000000000..5a730df51
--- /dev/null
+++ b/testsuite/gna/issue316/gen_pkg.vhdl
@@ -0,0 +1,13 @@
+package gen_pkg is
+ generic (
+ type T;
+ function "-"(a : T) return T-- is <>;
+ );
+end package;
+
+use work.gen_pkg;
+
+package p is new gen_pkg
+ generic map (
+ T => T_1000
+ );
diff --git a/testsuite/gna/issue316/testsuite.sh b/testsuite/gna/issue316/testsuite.sh
new file mode 100755
index 000000000..8175b86d2
--- /dev/null
+++ b/testsuite/gna/issue316/testsuite.sh
@@ -0,0 +1,10 @@
+#! /bin/sh
+
+. ../../testenv.sh
+
+export GHDL_STD_FLAGS=--std=08
+analyze_failure gen_pkg.vhdl
+
+clean
+
+echo "Test successful"