2012-11-03 14:17:42 +01:00
|
|
|
// DESCRIPTION: Verilator: Verilog Test module
|
|
|
|
|
//
|
2026-01-27 02:24:34 +01:00
|
|
|
// This file ONLY is placed under the Creative Commons Public Domain.
|
|
|
|
|
// SPDX-FileCopyrightText: 2012 Wilson Snyder
|
2020-03-21 16:24:24 +01:00
|
|
|
// SPDX-License-Identifier: CC0-1.0
|
2012-11-03 14:17:42 +01:00
|
|
|
|
|
|
|
|
package TEST_TYPES;
|
2026-03-10 02:38:29 +01:00
|
|
|
typedef struct a_struct_t; // Forward
|
|
|
|
|
typedef struct packed {logic stuff;} a_struct_t;
|
|
|
|
|
endpackage // TEST_TYPES
|
2012-11-03 14:17:42 +01:00
|
|
|
|
2026-03-10 02:38:29 +01:00
|
|
|
module t (
|
|
|
|
|
clk
|
|
|
|
|
);
|
|
|
|
|
input clk;
|
|
|
|
|
TEST_TYPES::a_struct_t [3:0] a_out;
|
|
|
|
|
sub sub (.a_out);
|
|
|
|
|
always @(posedge clk) begin
|
|
|
|
|
if (a_out[0] != 1'b0) $stop;
|
|
|
|
|
if (a_out[1] != 1'b1) $stop;
|
|
|
|
|
if (a_out[2] != 1'b0) $stop;
|
|
|
|
|
if (a_out[3] != 1'b1) $stop;
|
|
|
|
|
$write("*-* All Finished *-*\n");
|
|
|
|
|
$finish;
|
|
|
|
|
end
|
2012-11-03 14:17:42 +01:00
|
|
|
endmodule
|
|
|
|
|
|
2026-03-10 02:38:29 +01:00
|
|
|
module sub (
|
|
|
|
|
a_out
|
|
|
|
|
);
|
|
|
|
|
parameter N = 4;
|
|
|
|
|
output TEST_TYPES::a_struct_t [N-1:0] a_out;
|
|
|
|
|
always_comb begin
|
|
|
|
|
for (int i = 0; i < N; i++) a_out[i].stuff = i[0];
|
|
|
|
|
end
|
2012-11-03 14:17:42 +01:00
|
|
|
endmodule
|
|
|
|
|
|
|
|
|
|
// Local Variables:
|
|
|
|
|
// verilog-typedef-regexp: "_t$"
|
|
|
|
|
// End:
|