summaryrefslogtreecommitdiff
path: root/testsuite/gna/ticket11/tb2.vhdl
diff options
context:
space:
mode:
Diffstat (limited to 'testsuite/gna/ticket11/tb2.vhdl')
-rw-r--r--testsuite/gna/ticket11/tb2.vhdl22
1 files changed, 22 insertions, 0 deletions
diff --git a/testsuite/gna/ticket11/tb2.vhdl b/testsuite/gna/ticket11/tb2.vhdl
new file mode 100644
index 0000000..4ba80e1
--- /dev/null
+++ b/testsuite/gna/ticket11/tb2.vhdl
@@ -0,0 +1,22 @@
+entity tb2 is
+end entity;
+
+architecture arch of tb2 is
+ signal s: integer := 0;
+ signal s2: integer := 0;
+begin
+ process is
+ begin
+ wait for 1 us;
+ s2 <= 3;
+ 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;