mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-16 04:19:38 +02:00
b76def10b2
delcaration (instead of only for objcselector() nodes) * also print the wrong selector itself when it's wrong git-svn-id: branches/objc@13689 -
15 lines
230 B
ObjectPascal
15 lines
230 B
ObjectPascal
{ %fail }
|
|
{ %target=darwin }
|
|
{ %cpu=powerpc,i386 }
|
|
|
|
{$modeswitch objectivec1}
|
|
|
|
type
|
|
ta = objcclass
|
|
{ should give an error because the selector is invalid }
|
|
procedure test(l:longint); message 'test:l';
|
|
end;
|
|
|
|
begin
|
|
end.
|