diff options
-rw-r--r-- | testsuite/gna/bug033/simple.vhdl | 12 | ||||
-rw-r--r-- | testsuite/gna/bug033/simple08.vhdl | 13 | ||||
-rwxr-xr-x | testsuite/gna/bug033/testsuite.sh | 15 |
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" |