// example 7

<'

unit packet_generator_u { 

   //...
   event rdy_to_send is true('ready_for_pkt' === '1') @ clk_sys;

   packet_gen()@ rdy_to_send is {
      while(TRUE) { 
         var packet : packet_s; 
         if sys.time - last_packet_time >= 10 { 
            gen  packet; 
            send(packet);
         }else{
            wait cycle;
         };
      };
   };
};
'>