aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/gna/issue2221/test.vhdl
blob: 8114f07d10b84b173e421df9f9b33d4dce1a2f9f (plain)
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
library ieee;
use ieee.std_logic_1164.all;
use ieee.numeric_std.all;

entity test is
end entity;

architecture rtl of test is
  signal sig  : std_logic;
begin
end architecture;

library ieee;
use ieee.std_logic_1164.all;
use ieee.numeric_std.all;

entity test1 is
end entity;

architecture rtl of test1 is
  alias sig is << signal i_test.sig : std_logic >>;
  procedure p_test(signal sig1 : in std_logic) is
  begin
  end procedure;
begin
  i_test : entity work.test;

  p_proc : process
  begin
    p_test(sig);
    wait;
  end process;
end architecture;