diff options
| -rw-r--r-- | testsuite/gna/issue586/bug.vhdl | 6 | ||||
| -rw-r--r-- | testsuite/gna/issue586/bug_pkg.vhdl | 3 | ||||
| -rwxr-xr-x | testsuite/gna/issue586/testsuite.sh | 17 |
3 files changed, 26 insertions, 0 deletions
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" |