blob: b756dc7f64b57745e3a895f994ec18cfd4e4c0aa (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
|
package mwe_pkg is
type mwe_t is protected
procedure send_random_data (
constant num_bits : integer range 1 to 32 := 1
);
end protected;
end package;
package body mwe_pkg is
type mwe_t is protected body
procedure send_random_data (
constant num_bits : integer range 1 to 32 := 1
) is
variable rnd : boolean;
begin
-- init random seed
report rnd'instance_name;
end procedure;
end protected body;
end package body;
|
