aboutsummaryrefslogtreecommitdiffstats
path: root/testsuite/gna/issue792/dut.vhdl
blob: 49c299e688dc3ec874a0be87e7b28e2492102273 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
entity dut is
	port(
		a : in string(1 to 1)
	);
end entity dut;
architecture a of dut is
	component dut_internal
	port(
		a : in string;
		b : in string
	);
	end component dut_internal;
	signal b : string(1 to 1);
begin
	inst : dut_internal
		port map (
		a => a
		-- b => b
	);
end architecture a;