iverilog/ivtest/ivltests/pr1687193.v

22 lines
487 B
Verilog

`define EOF -1
module bar;
integer line, rc, file, a, b, c;
reg [8*256:1] str;
initial begin
file = $fopen ("ivltests/pr1687193.dat", "r");
if (file == 0)
$finish;
for (line = 1; line <= 5; line = line + 1) begin
rc = $fgets (str, file);
if (rc == `EOF)
$finish;
rc = $sscanf (str, "%h %h %h\n", a, b, c);
$display ("\tLine %d matches %d args: %h %h %h", line, rc, a, b, c);
end
$fclose (file);
$finish(0);
end
endmodule