fpc/tests/tbs/tb0418.pp
2005-02-14 17:13:06 +00:00

10 lines
122 B
ObjectPascal

procedure array_test(b: integer; parr: array of word; c: integer);
begin
end;
begin
array_test(0,[12,33,45],0);
end.