fpc/tests/tbf/tb0143.pp
2002-12-20 13:14:08 +00:00

14 lines
114 B
ObjectPascal

{ %version>=1.1 }
{ %fail }
{$macro on}
{$define extcall:=extcall}
procedure p;extcall;
begin
end;
begin
end.