]> oss.titaniummirror.com Git - msp430-gcc.git/blobdiff - gcc/testsuite/objc/execute/formal_protocol-4.m
Imported gcc-4.4.3
[msp430-gcc.git] / gcc / testsuite / objc / execute / formal_protocol-4.m
diff --git a/gcc/testsuite/objc/execute/formal_protocol-4.m b/gcc/testsuite/objc/execute/formal_protocol-4.m
deleted file mode 100644 (file)
index af79606..0000000
+++ /dev/null
@@ -1,40 +0,0 @@
-/* Contributed by Nicola Pero - Fri Mar  9 21:35:47 CET 2001 */
-#include <objc/objc.h>
-#include <objc/Object.h>
-
-/* Test defining a protocol, a class adopting it in a category */
-
-@protocol Evaluating
-- (int) importance;
-@end
-
-@interface Feature : Object
-@end
-
-@implementation Feature
-@end
-
-@interface Feature (EvaluatingProtocol) <Evaluating>
-@end
-
-@implementation Feature (EvaluatingProtocol)
-- (int) importance
-{
-  return 1000;
-}
-@end
-
-int main (void)
-{
-  id <Evaluating> object;
-
-  object = [Feature new];
-
-  if ([object importance] != 1000)
-    {
-      abort ();
-    }
-
-  return 0;
-}
-