Parcourir la source

* fixed test after merge in r13458 (selector() -> objcselector())

git-svn-id: branches/objc@13596 -
Jonas Maebe il y a 16 ans
Parent
commit
1a34492990
1 fichiers modifiés avec 2 ajouts et 2 suppressions
  1. 2 2
      tests/test/tobjc1.pp

+ 2 - 2
tests/test/tobjc1.pp

@@ -8,11 +8,11 @@ var
   a: NSObject;
 begin
   a:=NSObject(NSObject(NSObject.alloc).init);
-  if a.respondstoselector_(selector('isKindOfClass:')) then
+  if a.respondstoselector_(objcselector('isKindOfClass:')) then
     writeln('ok string selector!')
   else
     halt(1);
-  if a.respondstoselector_(selector(NSObject.init)) then
+  if a.respondstoselector_(objcselector(NSObject.init)) then
     writeln('ok method selector!')
   else
     halt(2);