Subversion Repositories sgmii

 
/*
Include this file after module
*/
integer ErrorCnt=0;
integer ErrorCode=0;	
	initial begin
		ErrorCnt=0;
		ErrorCode=0;
	end
`define Info(Message) $display("I@(%d):%s",$time,Message);
`define CheckE(Signal,Value,SignalName) if(Signal!==Value) begin \
				$display("E@(%d): expect %x, actual %x (%s,%s,%d)",$time,Value,Signal,SignalName,`__FILE__,`__LINE__); \
				ErrorCnt=ErrorCnt+1;\
				end
`define CheckF(Signal,Value,SignalName) if(Signal!==Value) begin \
				$display("F@(%d): expect %x, actual %x (%s,%s,%d)",$time,Value,Signal,SignalName,`__FILE__,`__LINE__); \
				$stop(1);\
				end
`define CheckW(Signal,Value,SignalName) if(Signal!==Value) begin \
				$display("W@(%d): expect %x, actual %x (%s,%s,%d)",$time,Value,Signal,SignalName,`__FILE__,`__LINE__); \
				end
 
`define WaitTil(Signal,Value,Clk,Message)	while(Signal!==Value) begin @(posedge Clk);#0.001;end \
				$display(Message);
`define WaitTilRise(Signal)	@(posedge Signal);#0.001;
`define WaitTilRall(Signal)	@(negedge Signal);#0.001;