blob: de1422675b1a342a41c65fe4ab1c240b5c0b8c29 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
|
entity e2b is
generic (gen1 : natural := 5);
end;
architecture a of e2b is
function outer(arg : integer) return integer is
function inner1(arg : integer) return integer is
begin
return arg + gen1;
end;
function inner2(arg : integer) return integer is
begin
return inner1(arg + 2);
end;
begin
return inner2(arg + 3);
end;
begin
end;
|
