forked from github/verilator
65 lines
1.2 KiB
Verilog
65 lines
1.2 KiB
Verilog
// DESCRIPTION: Verilator: System Verilog test of array querying functions.
|
|
//
|
|
// This code instantiates a module that calls the various array querying
|
|
// functions.
|
|
//
|
|
// This file ONLY is placed into the Public Domain, for any use, without
|
|
// warranty.
|
|
|
|
// Contributed 2012 by Jeremy Bennett, Embecosm.
|
|
|
|
module t (/*AUTOARG*/
|
|
// Inputs
|
|
clk
|
|
);
|
|
input clk;
|
|
|
|
wire a = clk;
|
|
wire b = 1'b0;
|
|
reg c;
|
|
|
|
array_test array_test_i (/*AUTOINST*/
|
|
// Inputs
|
|
.clk (clk));
|
|
|
|
endmodule
|
|
|
|
|
|
// Check the array sizing functions work correctly.
|
|
module array_test
|
|
|
|
#( parameter
|
|
LEFT = 5,
|
|
RIGHT = 55)
|
|
|
|
(/*AUTOARG*/
|
|
// Inputs
|
|
clk
|
|
);
|
|
|
|
input clk;
|
|
|
|
// verilator lint_off LITENDIAN
|
|
reg [7:0] a [LEFT:RIGHT];
|
|
// verilator lint_on LITENDIAN
|
|
|
|
integer l;
|
|
integer r;
|
|
integer s;
|
|
|
|
always @(posedge clk) begin
|
|
l = $left (a);
|
|
r = $right (a);
|
|
s = $size (a);
|
|
|
|
`ifdef TEST_VERBOSE
|
|
$write ("$left (a) = %d, $right (a) = %d, $size (a) = %d\n", l, r, s);
|
|
`endif
|
|
|
|
if ((l != LEFT) || (r != RIGHT) || (s != (RIGHT - LEFT + 1))) $stop;
|
|
$write("*-* All Finished *-*\n");
|
|
$finish;
|
|
end
|
|
|
|
endmodule
|