diff options
Diffstat (limited to 'testsuite')
-rw-r--r-- | testsuite/gna/ticket11/signalevents.vhdl | 20 | ||||
-rwxr-xr-x | testsuite/gna/ticket11/testsuite.sh | 10 |
2 files changed, 30 insertions, 0 deletions
diff --git a/testsuite/gna/ticket11/signalevents.vhdl b/testsuite/gna/ticket11/signalevents.vhdl new file mode 100644 index 0000000..98161ae --- /dev/null +++ b/testsuite/gna/ticket11/signalevents.vhdl @@ -0,0 +1,20 @@ +entity tb is +end entity; + +architecture arch of tb is + signal s: integer := 0; +begin + process is + begin + wait for 1 us; + s <= 1; + s <= 2 after 1 us; + assert s = 0; + wait on s; + report "s = " & integer'image(s); + assert s = 2 severity failure; + assert now = 2 us severity failure; + wait; + end process; + +end architecture; diff --git a/testsuite/gna/ticket11/testsuite.sh b/testsuite/gna/ticket11/testsuite.sh new file mode 100755 index 0000000..7226710 --- /dev/null +++ b/testsuite/gna/ticket11/testsuite.sh @@ -0,0 +1,10 @@ +#! /bin/sh + +. ../../testenv.sh + +analyze signalevents.vhdl +elab_simulate tb + +clean + +echo "Test successful" |