diff options
author | Tristan Gingold <tgingold@free.fr> | 2018-11-21 07:46:47 +0100 |
---|---|---|
committer | Tristan Gingold <tgingold@free.fr> | 2018-11-21 07:46:47 +0100 |
commit | 7bc27541e1b85ab4d55ed751c592d43796ab7fff (patch) | |
tree | 2facb5b213e7b35ca159461cd931d7a3ea98186b | |
parent | d22e878995eedc2efa45bbda640a5e984f03e224 (diff) | |
download | ghdl-7bc27541e1b85ab4d55ed751c592d43796ab7fff.tar.gz ghdl-7bc27541e1b85ab4d55ed751c592d43796ab7fff.tar.bz2 ghdl-7bc27541e1b85ab4d55ed751c592d43796ab7fff.zip |
Add testcase for #546
-rw-r--r-- | testsuite/gna/issue546/test-bug.vhdl | 8 | ||||
-rwxr-xr-x | testsuite/gna/issue546/testsuite.sh | 12 |
2 files changed, 20 insertions, 0 deletions
diff --git a/testsuite/gna/issue546/test-bug.vhdl b/testsuite/gna/issue546/test-bug.vhdl new file mode 100644 index 000000000..cc2ebc666 --- /dev/null +++ b/testsuite/gna/issue546/test-bug.vhdl @@ -0,0 +1,8 @@ +entity test_arr is +end entity; + +architecture behavior of test_arr is + type T is array(natural range <>) of bit_vector; + signal a: T(0 to 1)(0 to 1) := ("00", "11"); +begin +end architecture; diff --git a/testsuite/gna/issue546/testsuite.sh b/testsuite/gna/issue546/testsuite.sh new file mode 100755 index 000000000..43a820036 --- /dev/null +++ b/testsuite/gna/issue546/testsuite.sh @@ -0,0 +1,12 @@ +#! /bin/sh + +#exit 0 +. ../../testenv.sh + +export GHDL_STD_FLAGS=--std=08 +analyze test-bug.vhdl +elab_simulate test_arr + +clean + +echo "Test successful" |