aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/gna/issue542
diff options
context:
space:
mode:
authorTristan Gingold <tgingold@free.fr>2018-03-21 06:21:36 +0100
committerTristan Gingold <tgingold@free.fr>2018-03-21 06:21:36 +0100
commit628582294c3695f271c738d1459d57b239e04487 (patch)
treefd7627c33acf8bcc292ee92dc3fba387878b17f1 /testsuite/gna/issue542
parent7b59cea4fbf1efa72860216d6b1cd49af7109fe0 (diff)
downloadghdl-628582294c3695f271c738d1459d57b239e04487.tar.gz
ghdl-628582294c3695f271c738d1459d57b239e04487.tar.bz2
ghdl-628582294c3695f271c738d1459d57b239e04487.zip
Add test for architecture declarative region nested in entity's one.
Diffstat (limited to 'testsuite/gna/issue542')
-rw-r--r--testsuite/gna/issue542/nest.vhdl9
-rwxr-xr-xtestsuite/gna/issue542/testsuite.sh10
2 files changed, 19 insertions, 0 deletions
diff --git a/testsuite/gna/issue542/nest.vhdl b/testsuite/gna/issue542/nest.vhdl
new file mode 100644
index 000000000..0becf0fe2
--- /dev/null
+++ b/testsuite/gna/issue542/nest.vhdl
@@ -0,0 +1,9 @@
+entity nest is
+ constant c : natural := 1;
+end nest;
+
+architecture behav of nest is
+ -- Not valid in vhdl-02.
+ signal c : boolean;
+begin
+end behav;
diff --git a/testsuite/gna/issue542/testsuite.sh b/testsuite/gna/issue542/testsuite.sh
index b132693a1..300b24e3a 100755
--- a/testsuite/gna/issue542/testsuite.sh
+++ b/testsuite/gna/issue542/testsuite.sh
@@ -6,12 +6,22 @@ export GHDL_STD_FLAGS=--std=93
analyze write.vhd
analyze_failure wrapper.vhd
+analyze_failure nest.vhdl
+
+clean
+
+
+export GHDL_STD_FLAGS=--std=02
+analyze nest.vhdl
+
clean
export GHDL_STD_FLAGS=--std=08
analyze write.vhd
analyze_failure wrapper.vhd
+analyze_failure nest.vhdl
+
clean
echo "Test successful"