OpenCores
URL https://opencores.org/ocsvn/bluespec-h264/bluespec-h264/trunk

Subversion Repositories bluespec-h264

[/] [bluespec-h264/] [trunk/] [src/] [mkTH.bsv] - Diff between revs 2 and 35

Go to most recent revision | Show entire file | Details | Blame | View Log

Rev 2 Rev 35
Line 41... Line 41...
   Reg#(Bit#(32)) cyclecount <- mkReg(0);
   Reg#(Bit#(32)) cyclecount <- mkReg(0);
 
 
   rule countCycles ( True );
   rule countCycles ( True );
      if(cyclecount[4:0]==0) $display( "CCLCycleCount %0d", cyclecount );
      if(cyclecount[4:0]==0) $display( "CCLCycleCount %0d", cyclecount );
      cyclecount <= cyclecount+1;
      cyclecount <= cyclecount+1;
      if(cyclecount > 60000000)
      if(cyclecount > 600000000)
         begin
         begin
            $display( "ERROR mkTH: time out" );
            $display( "ERROR mkTH: time out" );
            $finish(0);
            $finish(0);
         end
         end
   endrule
   endrule

powered by: WebSVN 2.1.0

© copyright 1999-2025 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.