1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
|
// DESCRIPTION: Verilator: Functionally demonstrate an array of interfaces
//
// This file ONLY is placed into the Public Domain, for any use,
// without warranty, 2015 by Todd Strader.
// SPDX-License-Identifier: CC0-1.0
interface foo_intf;
logic a;
modport source (
output a
);
modport sink (
input a
);
endinterface
function integer identity (input integer val);
return val;
endfunction
module t (/*AUTOARG*/
// Inputs
clk
);
input clk;
localparam N = 5;
logic [N-1:0] a_in;
logic [N-1:0] a_out;
logic [N-1:0] ack_out;
foo_intf foos [N-1:0] ();
// Deferred link dotting with genvars
generate
genvar i;
for (i = 0; i < N-4; i++) begin : someLoop
assign ack_out[i] = a_in[i];
assign foos[i].a = a_in[i];
assign a_out[i] = foos[i].a;
end
endgenerate
// Defferred link dotting with localparam
localparam THE_LP = N-3;
assign ack_out[THE_LP] = a_in[THE_LP];
assign foos[THE_LP].a = a_in[THE_LP];
assign a_out[THE_LP] = foos[THE_LP].a;
// Defferred link dotting with arithmetic expression
assign ack_out[N-2] = a_in[N-2];
assign foos[N-2].a = a_in[N-2];
assign a_out[N-2] = foos[N-2].a;
// Defferred link dotting with funcrefs
assign ack_out[identity(N-1)] = a_in[identity(N-1)];
assign foos[identity(N-1)].a = a_in[identity(N-1)];
assign a_out[identity(N-1)] = foos[identity(N-1)].a;
initial a_in = '0;
always @(posedge clk) begin
a_in <= a_in + { {N-1 {1'b0}}, 1'b1 };
if (ack_out != a_out) begin
$display("%%Error: Interface and non-interface paths do not match: 0b%b 0b%b",
ack_out, a_out);
$stop;
end
if (& a_in) begin
$write("*-* All Finished *-*\n");
$finish;
end
end
endmodule
|
