X-Git-Url: https://oss.titaniummirror.com/gitweb/?a=blobdiff_plain;ds=sidebyside;f=gcc%2Ftestsuite%2Fobjc%2Fexecute%2Fformal_protocol-5.m;fp=gcc%2Ftestsuite%2Fobjc%2Fexecute%2Fformal_protocol-5.m;h=0000000000000000000000000000000000000000;hb=6fed43773c9b0ce596dca5686f37ac3fc0fa11c0;hp=3d9f778fe63a684e9588e997b9294b516d16ed85;hpb=27b11d56b743098deb193d510b337ba22dc52e5c;p=msp430-gcc.git diff --git a/gcc/testsuite/objc/execute/formal_protocol-5.m b/gcc/testsuite/objc/execute/formal_protocol-5.m deleted file mode 100644 index 3d9f778f..00000000 --- a/gcc/testsuite/objc/execute/formal_protocol-5.m +++ /dev/null @@ -1,33 +0,0 @@ -/* Contributed by Nicola Pero - Fri Mar 9 21:35:47 CET 2001 */ -#include -#include - -/* Test defining a protocol, and accessing it using @protocol */ - -@protocol Evaluating -- (int) importance; -@end - -/* A class adopting the protocol */ -@interface Test -@end - -@implementation Test -- (int) importance -{ - return 1000; -} -@end - -int main (void) -{ - Protocol *protocol = @protocol (Evaluating); - - if (strcmp ([protocol name], "Evaluating")) - { - abort (); - } - - return 0; -} -