mirror of
https://github.com/steveicarus/iverilog.git
synced 2026-09-03 01:13:47 +02:00
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.
57 lines
1.2 KiB
Verilog
57 lines
1.2 KiB
Verilog
// Test unary operators in constant functions
|
|
module constfunc4();
|
|
|
|
function [7:0] LInv(input [7:0] x);
|
|
LInv = ~x;
|
|
endfunction
|
|
|
|
function [7:0] LNeg(input [7:0] x);
|
|
LNeg = -x;
|
|
endfunction
|
|
|
|
function real RNeg(input real x);
|
|
RNeg = -x;
|
|
endfunction
|
|
|
|
function LAnd(input [7:0] x);
|
|
LAnd = &x;
|
|
endfunction
|
|
|
|
function LNot(input [7:0] x);
|
|
LNot = !x;
|
|
endfunction
|
|
|
|
function RNot(input real x);
|
|
RNot = !x;
|
|
endfunction
|
|
|
|
localparam [7:0] ResultLInv = LInv(8'h0f);
|
|
localparam [7:0] ResultLNeg = LNeg(8'h0f);
|
|
localparam real ResultRNeg = RNeg(15.0);
|
|
localparam ResultLAnd = LAnd(8'hff);
|
|
localparam ResultLNot = LNot(8'h00);
|
|
localparam ResultRNot = RNot(0.0);
|
|
|
|
reg failed;
|
|
|
|
initial begin
|
|
failed = 0;
|
|
$display("%h", ResultLInv);
|
|
$display("%h", ResultLNeg);
|
|
$display("%g", ResultRNeg);
|
|
$display("%b", ResultLAnd);
|
|
$display("%b", ResultLNot);
|
|
$display("%b", ResultRNot);
|
|
if (ResultLNeg !== 8'hf1) failed = 1;
|
|
if (ResultRNeg != -15.0) failed = 1;
|
|
if (ResultLAnd !== 1'b1) failed = 1;
|
|
if (ResultLNot !== 1'b1) failed = 1;
|
|
if (ResultRNot !== 1'b1) failed = 1;
|
|
if (failed)
|
|
$display("FAILED");
|
|
else
|
|
$display("PASSED");
|
|
end
|
|
|
|
endmodule
|