verilator/test_regress/t/t_param_pattern_init.v

92 lines
2.2 KiB
Systemverilog

// DESCRIPTION: Verilator: Verilog Test module
//
// This file ONLY is placed under the Creative Commons Public Domain.
// SPDX-FileCopyrightText: 2010 Wilson Snyder
// SPDX-License-Identifier: CC0-1.0
// verilog_format: off
`define stop $stop
`define checkh(gotv,expv) do if ((gotv) !== (expv)) begin $write("%%Error: %s:%0d: got='h%x exp='h%x\n", `__FILE__,`__LINE__, (gotv), (expv)); `stop; end while(0);
// verilog_format: on
package some_pkg;
localparam FOO = 5;
localparam BAR = 6;
typedef enum int {QUX = 7} pkg_enum_t;
endpackage
module t (
input clk
);
int cyc = 0;
localparam int unsigned SPI_INDEX = 0;
localparam int unsigned I2C_INDEX = 1;
localparam int unsigned TMR_INDEX = 4;
localparam logic [31:0] AHB_ADDR[6] = '{
SPI_INDEX: 32'h80001000,
I2C_INDEX: 32'h80002000,
TMR_INDEX: 32'h80003000,
default: '0
};
initial begin
`checkh(AHB_ADDR[0], 32'h80001000);
`checkh(AHB_ADDR[1], 32'h80002000);
`checkh(AHB_ADDR[2], 32'h0);
`checkh(AHB_ADDR[3], 32'h0);
`checkh(AHB_ADDR[4], 32'h80003000);
`checkh(AHB_ADDR[5], 32'h0);
end
genvar genvar_i;
for (genvar_i = 0; genvar_i < 2; genvar_i++) begin : the_gen
logic [31:0] gen_array[10];
always_comb gen_array = '{genvar_i: 32'habcd, default: 0};
always_ff @(posedge clk) begin
`checkh(gen_array[genvar_i], 32'habcd);
end
end
typedef enum int {
ENUM_A = 0,
ENUM_B,
ENUM_C
} enum_t;
logic [31:0] enum_array[11];
always_comb enum_array = '{ENUM_A: 32'h1234, ENUM_B: 32'h7777, ENUM_C: 32'ha5a5, default: 0};
always_ff @(posedge clk) begin
`checkh(enum_array[0], 32'h1234);
`checkh(enum_array[1], 32'h7777);
`checkh(enum_array[2], 32'ha5a5);
end
logic [31:0] package_array[8];
import some_pkg::*;
always_comb package_array = '{FOO: 32'h9876, BAR: 32'h1212, QUX: 32'h5432, default: 0};
always_ff @(posedge clk) begin
`checkh(package_array[5], 32'h9876);
`checkh(package_array[6], 32'h1212);
`checkh(package_array[7], 32'h5432);
end
always_ff @(posedge clk) begin
cyc <= cyc + 1;
if (cyc == 2) begin
$write("*-* All Finished *-*\n");
$finish;
end
end
endmodule