data/full_repos/permissive/501575943/tb/vlog_tb_utils.v
1: b'%Warning-STMTDLY: data/full_repos/permissive/501575943/tb/vlog_tb_utils.v:13: Unsupported: Ignoring delay on this delayed statement.\n   #timeout $display("Timeout: Forcing end of simulation");\n   ^\n                  ... Use "/* verilator lint_off STMTDLY */" and lint_on around source to disable this message.\n%Warning-STMTDLY: data/full_repos/permissive/501575943/tb/vlog_tb_utils.v:21: Unsupported: Ignoring delay on this delayed statement.\n  #1;\n  ^\n%Error: data/full_repos/permissive/501575943/tb/vlog_tb_utils.v:25: Unsupported or unknown PLI call: $fsdbDumpfile\n    $fsdbDumpfile({testcase,".fsdb"});\n    ^~~~~~~~~~~~~\n%Error: data/full_repos/permissive/501575943/tb/vlog_tb_utils.v:27: Unsupported or unknown PLI call: $fsdbDumpfile\n    $fsdbDumpfile("1.fsdb");\n    ^~~~~~~~~~~~~\n%Error: data/full_repos/permissive/501575943/tb/vlog_tb_utils.v:29: Unsupported or unknown PLI call: $fsdbDumpvars\n   $fsdbDumpvars(10);\n   ^~~~~~~~~~~~~\n%Warning-STMTDLY: data/full_repos/permissive/501575943/tb/vlog_tb_utils.v:36: Unsupported: Ignoring delay on this delayed statement.\n  #1;\n  ^\n%Warning-STMTDLY: data/full_repos/permissive/501575943/tb/vlog_tb_utils.v:63: Unsupported: Ignoring delay on this delayed statement.\n   forever #heartbeat $display("Heartbeat : Time=%0t", $time);\n           ^\n%Error: Exiting due to 3 error(s), 4 warning(s)\n        ... See the manual and https://verilator.org for more assistance.\n'
module vlog_tb_utils;
	parameter MAX_STRING_LEN = 128;
	localparam CHAR_WIDTH = 8;


	reg [63:0] timeout;
	initial
		if($value$plusargs("timeout=%d", timeout)) begin
			#timeout $display("Timeout: Forcing end of simulation");
			$finish;
		end

`ifndef NO_DUMP

	reg [MAX_STRING_LEN*CHAR_WIDTH-1:0] testcase;
	initial begin
		#1;
		if($test$plusargs("fsdb")) begin
			$display("dump testcase file!");
			if($value$plusargs("testcase=%s", testcase))
				$fsdbDumpfile({testcase,".fsdb"});
			else
				$fsdbDumpfile("1.fsdb");

			$fsdbDumpvars(`dump_level);
			$display("dump OK!");

		end
	end
	
	initial begin
		#1;
		$display("Start Recording Waveform in FSDB format with cli +fsdb! If not OK, open vlog_tb_utils.v +65!");


	end
`else
	initial begin
		#1;
		$display("No Recording action! If not OK, open vlog_tb_utils.v +44 or sim with option +vcd !");


	end

	initial begin
		if($test$plusargs("vcd")) begin
			$display("dump vcd file: test.vcd!");

   		$dumpfile("test.vcd");
   		$dumpvars;
		end
	end
`endif
	

	reg [63:0] heartbeat;
	initial begin
		if($value$plusargs("heartbeat=%d", heartbeat))
			forever #heartbeat $display("Heartbeat : Time=%0t", $time);
	end

endmodule
module vlog_tb_utils;

	parameter MAX_STRING_LEN = 128;
	localparam CHAR_WIDTH = 8;


	reg [63:0] timeout;
	initial
		if($value$plusargs("timeout=%d", timeout)) begin
			#timeout $display("Timeout: Forcing end of simulation");
			$finish;
		end

`ifndef NO_DUMP

	reg [MAX_STRING_LEN*CHAR_WIDTH-1:0] testcase;
	initial begin
		#1;
		if($test$plusargs("fsdb")) begin
			$display("dump testcase file!");
			if($value$plusargs("testcase=%s", testcase))
				$fsdbDumpfile({testcase,".fsdb"});
			else
				$fsdbDumpfile("1.fsdb");

			$fsdbDumpvars(`dump_level);
			$display("dump OK!");

		end
	end
	
	initial begin
		#1;
		$display("Start Recording Waveform in FSDB format with cli +fsdb! If not OK, open vlog_tb_utils.v +65!");


	end
`else
	initial begin
		#1;
		$display("No Recording action! If not OK, open vlog_tb_utils.v +44 or sim with option +vcd !");


	end

	initial begin
		if($test$plusargs("vcd")) begin
			$display("dump vcd file: test.vcd!");

   		$dumpfile("test.vcd");
   		$dumpvars;
		end
	end
`endif
	

	reg [63:0] heartbeat;
	initial begin
		if($value$plusargs("heartbeat=%d", heartbeat))
			forever #heartbeat $display("Heartbeat : Time=%0t", $time);
	end

endmodule