summaryrefslogtreecommitdiff
path: root/tests/test/tobjc41.pp
blob: 7f033f883a6f4f06bef0da26c5ec13235438c4b2 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
{ %target=darwin }
{ %fail }
{ %opt=-Sew }

{$mode objfpc}
{$modeswitch objectivec2}

uses
  uobjc41;

type
	NSDictionaryUtilities = objccategory (NSSubject)
           { the "key" paramter should give a warning because there's already a "key"
             message in a category for NSObject }
		function containsKey (key: NSString): boolean; message 'containsKey:';
	end;

function NSDictionaryUtilities.containsKey (key: NSString): boolean;
begin
  result:=false;
end;

begin
end.