1-- A very basic sanity test of wait statements 2entity wait1 is 3end entity; 4 5architecture test of wait1 is 6begin 7 8 process is 9 begin 10 assert now = 0 ns; 11 wait_1: wait for 1 ns; 12 assert now = 1 ns; 13 wait for 1 fs; 14 assert now = 1000001 fs; 15 end_wait: wait; 16 end process; 17 18end architecture; 19