29 lines
453 B
Coq
29 lines
453 B
Coq
|
// Check that binding task arguments by name is supported.
|
||
|
|
|
||
|
|
module test;
|
||
|
|
|
||
|
|
class B;
|
||
|
|
integer val;
|
||
|
|
|
||
|
|
function new(integer a, integer b);
|
||
|
|
val = a + b * 10;
|
||
|
|
endfunction
|
||
|
|
endclass
|
||
|
|
|
||
|
|
class C extends B;
|
||
|
|
function new;
|
||
|
|
super.new(.b(2), .a(1));
|
||
|
|
endfunction
|
||
|
|
endclass
|
||
|
|
|
||
|
|
initial begin
|
||
|
|
C c;
|
||
|
|
c = new;
|
||
|
|
if (c.val == 21) begin
|
||
|
|
$display("PASSED");
|
||
|
|
end else begin
|
||
|
|
$display("FAILED");
|
||
|
|
end
|
||
|
|
end
|
||
|
|
endmodule
|