浏览代码

Add more examples

Jonatan Gezelius 4 年之前
父节点
当前提交
f58e2e3276
共有 1 个文件被更改,包括 10 次插入0 次删除
  1. 10 0
      testbench/ha_tb.vhd

+ 10 - 0
testbench/ha_tb.vhd

@@ -54,7 +54,17 @@ begin
     report "Shit!";
     wait until r = '1';
     report "It happened!";
+
+    for i in 3 to 6 loop
+      report "Currently at " & integer'image(i);
+      wait for 1 ns;
+    end loop;
+
+    report "At end of test process!";
     wait;
   end process;
+
+  -- Invalid report in concurrent statement
+  --report "when is this?";
   
 end architecture;