fpc/tests/tbf/tb0143.pp
2002-12-20 14:44:03 +00:00

14 lines
113 B
ObjectPascal

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