summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--testsuite/gna/bug033/simple.vhdl12
-rw-r--r--testsuite/gna/bug033/simple08.vhdl13
-rwxr-xr-xtestsuite/gna/bug033/testsuite.sh15
3 files changed, 40 insertions, 0 deletions
diff --git a/testsuite/gna/bug033/simple.vhdl b/testsuite/gna/bug033/simple.vhdl
new file mode 100644
index 0000000..8434da6
--- /dev/null
+++ b/testsuite/gna/bug033/simple.vhdl
@@ -0,0 +1,12 @@
+entity simple is
+end;
+
+architecture behav of simple is
+begin
+ process
+ begin
+ assert false report "Test is running" severity note;
+ wait; -- Indefinite
+ end process;
+end behav;
+
diff --git a/testsuite/gna/bug033/simple08.vhdl b/testsuite/gna/bug033/simple08.vhdl
new file mode 100644
index 0000000..1f919e8
--- /dev/null
+++ b/testsuite/gna/bug033/simple08.vhdl
@@ -0,0 +1,13 @@
+/* Using vhdl 2008 comments. */
+entity simple08 is
+end;
+
+architecture behav of simple08 is
+begin
+ process
+ begin
+ assert false report "Test is running" severity note;
+ wait; -- Indefinite
+ end process;
+end behav;
+
diff --git a/testsuite/gna/bug033/testsuite.sh b/testsuite/gna/bug033/testsuite.sh
new file mode 100755
index 0000000..c57a46b
--- /dev/null
+++ b/testsuite/gna/bug033/testsuite.sh
@@ -0,0 +1,15 @@
+#! /bin/sh
+
+. ../../testenv.sh
+
+analyze simple.vhdl
+elab_simulate simple
+
+$GHDL --reprint simple.vhdl
+$GHDL --pp-html simple.vhdl > /dev/null
+$GHDL --xref-html simple.vhdl
+$GHDL --xref-html --std=08 simple08.vhdl
+
+clean
+
+echo "Test successful"