tests/test/tmaclocalprocparam4g.pp


1
2
3
4
5
6
7
8
9
10
11

{ %fail }

{$modeswitch nestedprocvars}

{ should fail because such inline definitions are always nested }
procedure test(procedure pp is nested);
begin
end;

begin
end.