gcc/testsuite/objc/execute/formal_protocol-7.m

   1 /* Contributed by Nicola Pero - Fri Mar  9 21:35:47 CET 2001 */
   2 #include <objc/objc.h>
   3 #include <objc/Object.h>
   4 #include <objc/Protocol.h>
   5
   6 /* Test defining two protocols, one incorporating the other one. */
   7
   8 @protocol Configuring
   9 - (void) configure;
  10 @end
  11
  12 @protocol Processing <Configuring>
  13 - (void) process;
  14 @end
  15
  16 /* A class adopting the protocol */
  17 @interface Test : Object <Processing>
  18 {
  19   BOOL didConfigure;
  20   BOOL didProcess;
  21 }
  22 @end
  23
  24 @implementation Test
  25 - (void) configure
  26 {
  27   didConfigure = YES;
  28 }
  29 - (void) process
  30 {
  31   didProcess = YES;
  32 }
  33 @end
  34
  35 int main (void)
  36 {
  37   id <Processing> object = [Test new];
  38
  39   [object configure];
  40   [object process];
  41
  42   return 0;
  43 }
  44