data/full_repos/permissive/42434302/ivltests/automatic_events.v
1: b'%Warning-STMTDLY: data/full_repos/permissive/42434302/ivltests/automatic_events.v:9: Unsupported: Ignoring delay on this delayed statement.\n  #200;\n  ^\n                  ... Use "/* verilator lint_off STMTDLY */" and lint_on around source to disable this message.\n%Warning-STMTDLY: data/full_repos/permissive/42434302/ivltests/automatic_events.v:11: Unsupported: Ignoring delay on this delayed statement.\n    #10 any[i] = 1;\n    ^\n%Warning-STMTDLY: data/full_repos/permissive/42434302/ivltests/automatic_events.v:12: Unsupported: Ignoring delay on this delayed statement.\n    #10 any[i] = 0;\n    ^\n%Warning-STMTDLY: data/full_repos/permissive/42434302/ivltests/automatic_events.v:27: Unsupported: Ignoring delay on this delayed statement.\n  #n;\n  ^\n%Error: data/full_repos/permissive/42434302/ivltests/automatic_events.v:30: Unsupported: fork statements\n  fork\n  ^~~~\n%Warning-STMTDLY: data/full_repos/permissive/42434302/ivltests/automatic_events.v:32: Unsupported: Ignoring delay on this delayed statement.\n      #10 neg[i] = 1;\n      ^\n%Warning-STMTDLY: data/full_repos/permissive/42434302/ivltests/automatic_events.v:33: Unsupported: Ignoring delay on this delayed statement.\n      #10 pos[i] = 1;\n      ^\n%Warning-STMTDLY: data/full_repos/permissive/42434302/ivltests/automatic_events.v:34: Unsupported: Ignoring delay on this delayed statement.\n      #10 neg[i] = 0;\n      ^\n%Warning-STMTDLY: data/full_repos/permissive/42434302/ivltests/automatic_events.v:35: Unsupported: Ignoring delay on this delayed statement.\n      #10 pos[i] = 0;\n      ^\n%Error: data/full_repos/permissive/42434302/ivltests/automatic_events.v:38: syntax error, unexpected \'@\'\n      @( any[1] or posedge pos[1] or negedge neg[1]\n      ^\n%Warning-STMTDLY: data/full_repos/permissive/42434302/ivltests/automatic_events.v:43: Unsupported: Ignoring delay on this delayed statement.\n      #n $display("task %0d triggered: %b  %b  %b %4d", n, any, pos, neg, $time);\n      ^\n%Error: data/full_repos/permissive/42434302/ivltests/automatic_events.v:51: Unsupported: fork statements\n  fork\n  ^~~~\n%Error: Exiting due to 3 error(s), 9 warning(s)\n        ... See the manual and https://verilator.org for more assistance.\n'
module automatic_events();

reg [5:1] any;

integer i;

initial begin
  any = 5'b00000;
  #200;
  for (i = 1; i <= 5; i = i + 1) begin
    #10 any[i] = 1;
    #10 any[i] = 0;
  end
end

task automatic report_events;

input integer n;

reg [5:1] pos;
reg [5:1] neg;

integer i;
integer j;

begin
  #n;
  pos = 5'b00000;
  neg = 5'b00000;
  fork
    for (i = 1; i <= 5; i = i + 1) begin
      #10 neg[i] = 1;
      #10 pos[i] = 1;
      #10 neg[i] = 0;
      #10 pos[i] = 0;
    end
    for (j = 1; j <= 20; j = j + 1) begin
      @( any[1] or posedge pos[1] or negedge neg[1]
      or any[2] or posedge pos[2] or negedge neg[2]
      or any[3] or posedge pos[3] or negedge neg[3]
      or any[4] or posedge pos[4] or negedge neg[4]
      or any[5] or posedge pos[5] or negedge neg[5] );
      #n $display("task %0d triggered: %b  %b  %b %4d", n, any, pos, neg, $time);
    end
  join
end

endtask

initial begin
  fork
    report_events(1);
    report_events(2);
  join
  $finish;
end

endmodule
module automatic_events();


reg [5:1] any;

integer i;

initial begin
  any = 5'b00000;
  #200;
  for (i = 1; i <= 5; i = i + 1) begin
    #10 any[i] = 1;
    #10 any[i] = 0;
  end
end

task automatic report_events;

input integer n;

reg [5:1] pos;
reg [5:1] neg;

integer i;
integer j;

begin
  #n;
  pos = 5'b00000;
  neg = 5'b00000;
  fork
    for (i = 1; i <= 5; i = i + 1) begin
      #10 neg[i] = 1;
      #10 pos[i] = 1;
      #10 neg[i] = 0;
      #10 pos[i] = 0;
    end
    for (j = 1; j <= 20; j = j + 1) begin
      @( any[1] or posedge pos[1] or negedge neg[1]
      or any[2] or posedge pos[2] or negedge neg[2]
      or any[3] or posedge pos[3] or negedge neg[3]
      or any[4] or posedge pos[4] or negedge neg[4]
      or any[5] or posedge pos[5] or negedge neg[5] );
      #n $display("task %0d triggered: %b  %b  %b %4d", n, any, pos, neg, $time);
    end
  join
end

endtask

initial begin
  fork
    report_events(1);
    report_events(2);
  join
  $finish;
end

endmodule