Files
iverilog/ivtest/ivltests/constfunc6_ams.v
T
Stephen Williams cea237b407 Add ivtest to the iverilog source tree
By adding ivtest to the iverilog source tree, it is easier to keep
the regression test synchronized with the source that is being tested.
This should be especially helpful for PRs that add a new feature, and
have a matching ivtest PR with the regression test for that feature.
2022-01-15 10:18:50 -08:00

61 lines
1.4 KiB
Verilog

// Test system function calls in constant functions
module constfunc6();
function signed [7:0] abs_i(input signed [7:0] a);
abs_i = $abs(a);
endfunction
function real abs_r(input real a);
abs_r = $abs(a);
endfunction
function [7:0] min_i(input [7:0] a, input [7:0] b);
min_i = $min(a, b);
endfunction
function [7:0] max_i(input [7:0] a, input [7:0] b);
max_i = $max(a, b);
endfunction
function real min_r(input real a, input real b);
min_r = $min(a, b);
endfunction
function real max_r(input real a, input real b);
max_r = $max(a, b);
endfunction
localparam [7:0] absIResult = abs_i(-25);
localparam [7:0] minIResult = min_i(25, 30);
localparam [7:0] maxIResult = max_i(25, 30);
localparam real absRResult = abs_r(-25.0);
localparam real minRResult = min_r(25.0, 30.0);
localparam real maxRResult = max_r(25.0, 30.0);
reg failed;
initial begin
failed = 0;
$display("%0d", absIResult);
$display("%0g", absRResult);
$display("%0d", minIResult);
$display("%0g", minRResult);
$display("%0d", maxIResult);
$display("%0g", maxRResult);
if ( absIResult !== 8'd25) failed = 1;
if ( absRResult != 25.0) failed = 1;
if ( minIResult !== 8'd25) failed = 1;
if ( minRResult != 25.0) failed = 1;
if ( maxIResult !== 8'd30) failed = 1;
if ( maxRResult != 30.0) failed = 1;
if (failed)
$display("FAILED");
else
$display("PASSED");
end
endmodule