+ tests forgotten to commit earlier

git-svn-id: branches/objc@13678 -

.gitattributes

@@ -8221,6 +8221,8 @@ tests/test/tobjc10.pp svneol=native#text/plain
 tests/test/tobjc11.pp svneol=native#text/plain
 tests/test/tobjc12.pp svneol=native#text/plain
 tests/test/tobjc13.pp svneol=native#text/plain
+tests/test/tobjc13a.pp svneol=native#text/plain
+tests/test/tobjc13b.pp svneol=native#text/plain
 tests/test/tobjc14.pp svneol=native#text/plain
 tests/test/tobjc15.pp svneol=native#text/plain
 tests/test/tobjc16.pp svneol=native#text/plain

tests/test/tobjc13a.pp

@@ -0,0 +1,19 @@
+{ %fail }
+{ %target=darwin }
+{ %cpu=powerpc,i386 }
+{ %norun }
+
+{$mode objfpc}
+{$modeswitch objectivec1}
+
+type
+  ta = objcclass(NSObject)
+    procedure test2(l: longint); varargs; message 'class:';
+  end;
+
+  procedure ta.test2(l: longint);
+   begin
+   end;
+
+begin
+end.

tests/test/tobjc13b.pp

@@ -0,0 +1,19 @@
+{ %fail }
+{ %target=darwin }
+{ %cpu=powerpc,i386 }
+{ %norun }
+
+{$mode objfpc}
+{$modeswitch objectivec1}
+
+type
+  ta = objcclass(NSObject)
+    procedure test(l: longint; a: array of const); message 'class:';
+  end;
+
+  procedure ta.test(l: longint; a: array of const);
+   begin
+   end;
+
+begin
+end.