* renamed selector() to objcselector() for consistency with the way all

    other Objective-C integration keywords/functions are being named

git-svn-id: trunk@13456 -

compiler/psystem.pas

@@ -102,7 +102,7 @@ implementation
 {$ifdef SUPPORT_UNALIGNED}
         systemunit.insert(tsyssym.create('Unaligned',in_unaligned_x));
 {$endif SUPPORT_UNALIGNED}
-        systemunit.insert(tsyssym.create('Selector',in_objc_selector_x)); { objc only }
+        systemunit.insert(tsyssym.create('ObjCSelector',in_objc_selector_x)); { objc only }
       end;
 
 

tests/test/tsel1.pp

@@ -7,9 +7,9 @@
 var
   a: sel;
 begin
-  a:=selector('mymethod');
-  a:=selector('mymethod');
-  a:=selector('mymethod:');
-  a:=selector('::');
-  a:=selector('a:b:c:');
+  a:=objcselector('mymethod');
+  a:=objcselector('mymethod');
+  a:=objcselector('mymethod:');
+  a:=objcselector('::');
+  a:=objcselector('a:b:c:');
 end.

tests/test/tsel2.pp

@@ -7,5 +7,5 @@
 var
   a: sel;
 begin
-  a:=selector('my:method');
+  a:=objcselector('my:method');
 end.