From 5a74fc4623feb495512954cf4bee809e0eeb097c Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Mon, 7 Jan 2019 19:10:20 +0100 Subject: Add testcase for #735 --- testsuite/gna/issue735/ent.vhdl | 12 ++++++++++++ testsuite/gna/issue735/testsuite.sh | 11 +++++++++++ 2 files changed, 23 insertions(+) create mode 100644 testsuite/gna/issue735/ent.vhdl create mode 100755 testsuite/gna/issue735/testsuite.sh (limited to 'testsuite') diff --git a/testsuite/gna/issue735/ent.vhdl b/testsuite/gna/issue735/ent.vhdl new file mode 100644 index 000000000..f44d5dab2 --- /dev/null +++ b/testsuite/gna/issue735/ent.vhdl @@ -0,0 +1,12 @@ +entity ent is +end entity; + +architecture impl of ent is + type bool_vector is array(0 downto 0) of boolean; + signal baz: bool_vector; +begin + +assert baz(0) + severity note; + +end architecture; diff --git a/testsuite/gna/issue735/testsuite.sh b/testsuite/gna/issue735/testsuite.sh new file mode 100755 index 000000000..bda8f5d14 --- /dev/null +++ b/testsuite/gna/issue735/testsuite.sh @@ -0,0 +1,11 @@ +#! /bin/sh + +. ../../testenv.sh + +export GHDL_STD_FLAGS=--std=08 +analyze ent.vhdl +elab_simulate ent + +clean + +echo "Test successful" -- cgit v1.2.3