From d1bcdf138b3852a16799b3b92d6747736e9938eb Mon Sep 17 00:00:00 2001 From: Tristan Gingold Date: Sun, 22 Oct 2017 20:57:31 +0200 Subject: Add testcase from #235. --- testsuite/gna/issue235/test.vhdl | 18 ++++++++++++++++++ testsuite/gna/issue235/testsuite.sh | 11 +++++++++++ 2 files changed, 29 insertions(+) create mode 100644 testsuite/gna/issue235/test.vhdl create mode 100755 testsuite/gna/issue235/testsuite.sh diff --git a/testsuite/gna/issue235/test.vhdl b/testsuite/gna/issue235/test.vhdl new file mode 100644 index 000000000..812282766 --- /dev/null +++ b/testsuite/gna/issue235/test.vhdl @@ -0,0 +1,18 @@ +PACKAGE test_pkg IS + + TYPE string_array_t IS ARRAY (natural RANGE <>) OF string; + +END test_pkg; + +ENTITY test IS +END ENTITY test; + +LIBRARY work; +USE work.test_pkg.string_array_t; + +ARCHITECTURE rtl OF test IS + + +BEGIN + +END ARCHITECTURE rtl; diff --git a/testsuite/gna/issue235/testsuite.sh b/testsuite/gna/issue235/testsuite.sh new file mode 100755 index 000000000..1d84c0f57 --- /dev/null +++ b/testsuite/gna/issue235/testsuite.sh @@ -0,0 +1,11 @@ +#! /bin/sh + +. ../../testenv.sh + +export GHDL_STD_FLAGS=--std=08 +analyze test.vhdl +elab_simulate test + +clean + +echo "Test successful" -- cgit v1.2.3