load-2.m: New test.

        * objc/execute/load-2.m: New test.  From Nicola Pero
        <n.pero@mi.flashnet.it>.

From-SVN: r43051

gcc/testsuite/ChangeLog

+2001-06-08  Stan Shebs  <shebs@apple.com>
+
+	* objc/execute/load-2.m: New test.  From Nicola Pero
+	<n.pero@mi.flashnet.it>.
+	
 2001-06-08  Jakub Jelinek  <jakub@redhat.com>
 
 	* gcc.c-torture/execute/20010605-2.c: New test.

gcc/testsuite/objc/execute/load-2.m

+/* Contributed by Nicola Pero - Wed Jun  6 14:34:23 CEST 2001 */
+#include <objc/objc.h>
+
+/* Test that +load is automatically called before main is run;
+   on two different classes. */
+
+static int static_variable1 = 0;
+static int static_variable2 = 0;
+
+@interface TestClass1
+{
+  Class isa;
+}
++ (void) load;
+@end
+
+@implementation TestClass1
++ (void) load
+{
+  static_variable1 = 1;
+}
+@end
+
+@interface TestClass2
+{
+  Class isa;
+}
++ (void) load;
+@end
+
+@implementation TestClass2
++ (void) load
+{
+  static_variable2 = 1;
+}
+@end
+
+int main (void)
+{
+  if (static_variable1 != 1  ||  static_variable2 != 1)
+    {
+      abort ();
+    }
+
+  return 0;
+}