Mismatched $fatal arguments invalidate containing procedural block

[povik]

The following input isn't handled in the best way:

module top(input clk);
    always @(posedge clk) begin
        // ... long procedure
        $fatal("foo");
    end
endmodule

-- Running command `read_slang repro5.sv' --

1. Executing SLANG frontend.
Top level design units:
    top

repro5.sv:2:5: error: unsynthesizable feature
    always @(posedge clk) begin
    ^
repro5.sv:4:16: warning: finish argument must have value of 0, 1, or 2 [-Wfinish-num]
        $fatal("foo");
               ^~~~~