blob: 4000c7db159d52b7673679c3c1481154bb2b1258 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
|
function SomeFunc(var Res: array of Double): Integer;
begin
// do something
writeln(High(Res));
end;
var
d: Double;
darr: array[1..3] of Double;
begin
SomeFunc(d); // Delphi accepts this, FPC does not
SomeFunc(darr); // OK
end.
|
