aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2015-06-08 20:08:23 +0200
committerTristan Gingold <tgingold@free.fr>2015-06-08 20:08:23 +0200
commit785e8bbe85cf01cb7818935d6c12eb0aae15655a (patch)
tree7018507a7450e5e9e95a0028331312a439f2db85
parent70505bdf00e894e9377e980dcce3edadd0d128c2 (diff)
downloadghdl-785e8bbe85cf01cb7818935d6c12eb0aae15655a.tar.gz
ghdl-785e8bbe85cf01cb7818935d6c12eb0aae15655a.tar.bz2
ghdl-785e8bbe85cf01cb7818935d6c12eb0aae15655a.zip
Testcase for ticket 88.
-rw-r--r--testsuite/gna/ticket88/bug.vhdl12
-rwxr-xr-xtestsuite/gna/ticket88/testsuite.sh8
2 files changed, 20 insertions, 0 deletions
diff --git a/testsuite/gna/ticket88/bug.vhdl b/testsuite/gna/ticket88/bug.vhdl
new file mode 100644
index 000000000..fd0a93d5c
--- /dev/null
+++ b/testsuite/gna/ticket88/bug.vhdl
@@ -0,0 +1,12 @@
+entity ent is
+end entity;
+
+architecture a of ent is
+ component comp is
+ end component;
+
+ for inst : comp use configuration cfg;
+begin
+ inst : comp;
+end architecture;
+
diff --git a/testsuite/gna/ticket88/testsuite.sh b/testsuite/gna/ticket88/testsuite.sh
new file mode 100755
index 000000000..e2d8f1e03
--- /dev/null
+++ b/testsuite/gna/ticket88/testsuite.sh
@@ -0,0 +1,8 @@
+#! /bin/sh
+
+. ../../testenv.sh
+
+analyze_failure bug.vhdl
+clean
+
+echo "Test successful"