fpc/tests/tbf/tb0205.pp
2008-01-04 12:54:47 +00:00

15 lines
141 B
ObjectPascal

{ %fail }
procedure test(a: array of longint); forward;
type
tl = type longint;
procedure test(a: array of tl);
begin
end;
begin
end.