diff options
| author | Tristan Gingold <tgingold@free.fr> | 2020-03-11 21:19:19 +0100 |
|---|---|---|
| committer | Tristan Gingold <tgingold@free.fr> | 2020-03-13 06:30:28 +0100 |
| commit | f18f3f74a73c8677698a2797d5ae6b5b458351e3 (patch) | |
| tree | ccba58adc47c3d88902b2149eb883adcf6d9765b /testsuite/gna/bug0112/assert01.vhdl | |
| parent | d70084ccb149ff4f5fca072c672b1f3d040358a9 (diff) | |
| download | ghdl-f18f3f74a73c8677698a2797d5ae6b5b458351e3.tar.gz ghdl-f18f3f74a73c8677698a2797d5ae6b5b458351e3.tar.bz2 ghdl-f18f3f74a73c8677698a2797d5ae6b5b458351e3.zip | |
testsuite/gna: add testcase for previous commit.
Diffstat (limited to 'testsuite/gna/bug0112/assert01.vhdl')
| -rw-r--r-- | testsuite/gna/bug0112/assert01.vhdl | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/gna/bug0112/assert01.vhdl b/testsuite/gna/bug0112/assert01.vhdl new file mode 100644 index 000000000..da12815f5 --- /dev/null +++ b/testsuite/gna/bug0112/assert01.vhdl @@ -0,0 +1,13 @@ +entity assert01 is + generic ( + ginv : boolean := false + ); + port (i : bit; + o : out bit); +end assert01; + +architecture behav of assert01 is +begin + assert (not ginv) report "ginv is true" severity failure; + o <= i; +end behav; |