1 files changed, 63 insertions, 0 deletions
diff --git a/gcc-4.9/gcc/testsuite/objc/execute/class_self-1.m b/gcc-4.9/gcc/testsuite/objc/execute/class_self-1.m
new file mode 100644
index 000000000..9045305e5
--- /dev/null
+++ b/gcc-4.9/gcc/testsuite/objc/execute/class_self-1.m
@@ -0,0 +1,63 @@
+/* Contributed by Nicola Pero - Fri Oct 26 22:39:32 BST 2001 */
+#include <objc/objc.h>
+
+/* Test calling a class method when there is an instance method 
+   with conflicting types */
+
+/* This class should be unused but on broken compilers its instance
+   method might get picked up and used instead of the class method of
+   another class ! */
+struct d
+{
+  int a;
+};
+
+@interface UnusedClass
+{
+  Class isa;
+}
+- (struct d) method;
+@end
+
+@implementation UnusedClass
+- (struct d) method
+{
+  struct d u;
+  u.a = 0;
+  
+  return u;
+}
+@end
+
+/* The real class */
+@interface TestClass
+{
+  Class isa;
+}
++ (void) test;
++ (int) method;
+@end
+
+@implementation TestClass
++ (void) test
+{
+  if ([self method] != 4)
+    {
+      abort ();
+    }
+}
+
++ (int) method
+{
+  return 4;
+}
++ initialize { return self; }
+@end
+
+
+int main (void)
+{
+  [TestClass test];
+
+  return 0;
+}