mirror of
https://github.com/steveicarus/iverilog.git
synced 2026-09-03 16:29:25 +02:00
Lars-Peter Clausen
338516bc55
Check that constant recursive functions are supported. Check both Verilog style using assignments to the implicit function return signal and SystemVerilog style using `return`. Signed-off-by: Lars-Peter Clausen <[email protected]>
26 lines
445 B
Verilog
26 lines
445 B
Verilog
// Check that constant recursive functions are supported.
|
|
|
|
module recursive_func();
|
|
|
|
function automatic [15:0] factorial;
|
|
|
|
input [15:0] n;
|
|
|
|
begin
|
|
factorial = (n > 1) ? factorial(n - 1) * n : n;
|
|
end
|
|
|
|
endfunction
|
|
|
|
localparam F3 = factorial(3);
|
|
localparam F4 = factorial(4);
|
|
localparam F5 = factorial(5);
|
|
|
|
initial begin
|
|
$display("factorial 3 = %0d", F3);
|
|
$display("factorial 4 = %0d", F4);
|
|
$display("factorial 5 = %0d", F5);
|
|
end
|
|
|
|
endmodule
|