From 981322e4a8e3e09446bc37631fd2c46880ad4cfa Mon Sep 17 00:00:00 2001
From: Tristan Gingold <tgingold@free.fr>
Date: Tue, 29 May 2018 06:04:56 +0200
Subject: Add reproducer for #586

---
 testsuite/gna/issue586/bug.vhdl     |  6 ++++++
 testsuite/gna/issue586/bug_pkg.vhdl |  3 +++
 testsuite/gna/issue586/testsuite.sh | 17 +++++++++++++++++
 3 files changed, 26 insertions(+)
 create mode 100644 testsuite/gna/issue586/bug.vhdl
 create mode 100644 testsuite/gna/issue586/bug_pkg.vhdl
 create mode 100755 testsuite/gna/issue586/testsuite.sh

diff --git a/testsuite/gna/issue586/bug.vhdl b/testsuite/gna/issue586/bug.vhdl
new file mode 100644
index 000000000..5c0ec5272
--- /dev/null
+++ b/testsuite/gna/issue586/bug.vhdl
@@ -0,0 +1,6 @@
+use work.bug_pkg.t_zero_one;            -- .all works
+entity bug is
+  generic (
+    test : t_zero_one := zero
+    );
+end entity bug;
diff --git a/testsuite/gna/issue586/bug_pkg.vhdl b/testsuite/gna/issue586/bug_pkg.vhdl
new file mode 100644
index 000000000..e683fc794
--- /dev/null
+++ b/testsuite/gna/issue586/bug_pkg.vhdl
@@ -0,0 +1,3 @@
+package bug_pkg is
+  type t_zero_one is (zero, one);
+end package bug_pkg;
diff --git a/testsuite/gna/issue586/testsuite.sh b/testsuite/gna/issue586/testsuite.sh
new file mode 100755
index 000000000..f7fa6d979
--- /dev/null
+++ b/testsuite/gna/issue586/testsuite.sh
@@ -0,0 +1,17 @@
+#! /bin/sh
+
+. ../../testenv.sh
+
+export GHDL_STD_FLAGS=--std=08
+analyze bug_pkg.vhdl
+analyze bug.vhdl
+
+clean
+
+export GHDL_STD_FLAGS=--std=02
+analyze bug_pkg.vhdl
+analyze_failure bug.vhdl
+
+clean
+
+echo "Test successful"
-- 
cgit v1.2.3