diff options
Diffstat (limited to 'testsuite')
| -rw-r--r-- | testsuite/gna/bug0100/notype1.vhdl | 14 | ||||
| -rwxr-xr-x | testsuite/gna/bug0100/testsuite.sh | 7 |
2 files changed, 21 insertions, 0 deletions
diff --git a/testsuite/gna/bug0100/notype1.vhdl b/testsuite/gna/bug0100/notype1.vhdl new file mode 100644 index 000000000..009354b36 --- /dev/null +++ b/testsuite/gna/bug0100/notype1.vhdl @@ -0,0 +1,14 @@ +entity sub1 is + port (i : bit_vector); +end; + +entity notype1 is +end; + +architecture behav of notype1 is + type counter_t is array (2 downto 0) of (31 downto 0); + signal cnts : counter_t; +begin + i : entity work.sub1 + port map (i => cnts (0)); +end; diff --git a/testsuite/gna/bug0100/testsuite.sh b/testsuite/gna/bug0100/testsuite.sh index 27d530133..5f1ca87df 100755 --- a/testsuite/gna/bug0100/testsuite.sh +++ b/testsuite/gna/bug0100/testsuite.sh @@ -3,6 +3,13 @@ . ../../testenv.sh analyze_failure --force-analysis inst1.vhdl +analyze_failure --force-analysis notype1.vhdl + +if analyze_failure --force-analysis notype1.vhdl 2>&1 | grep -q "indexed name"; then + : +else + echo "FAIL: missing error message from semantic analysis" +fi clean |