fpc/tests/webtbf/tw9015.pp
2008-03-02 15:00:32 +00:00

10 lines
124 B
ObjectPascal

{ %fail }
procedure p1(const b;l:longint);
begin
end;
begin
// Expected error: variable required
p1(1,sizeof(1));
end.