OpenCores
URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [objc/] [execute/] [np-2.m] - Blame information for rev 825

Go to most recent revision | Details | Compare with Previous | View Log

Line No. Rev Author Line
1 149 jeremybenn
/*
2
 * Contributed by Nicola Pero <n.pero@mi.flashnet.it>
3
 * Tue Sep 19 4:34AM
4
 */
5
#include <objc/objc.h>
6
#include <objc/Protocol.h>
7
 
8
@protocol MyProtocol
9
+ (oneway void) methodA;
10
@end
11
 
12
@interface MyObject <MyProtocol>
13
@end
14
 
15
@implementation MyObject
16
+ (oneway void) methodA
17
{
18
  printf ("methodA\n");
19
}
20
#ifdef __NEXT_RUNTIME__                                   
21
+ initialize { return self; }
22
#endif
23
@end
24
 
25
int main (void)
26
{
27
  [MyObject methodA];
28
 
29
   exit (0);
30
}
31
 
32
 

powered by: WebSVN 2.1.0

© copyright 1999-2024 OpenCores.org, equivalent to Oliscience, all rights reserved. OpenCores®, registered trademark.