summaryrefslogtreecommitdiff
path: root/gcc/testsuite/objc/execute/_cmd.m
blob: f2b05b6527b7a6e81ffd9daa4ddb390e00e2f55a (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
/* Contributed by Nicola Pero - Fri Mar  9 19:39:15 CET 2001 */
#include <objc/objc.h>
#include <objc/objc-api.h>

#include "next_mapping.h"

/* Test the hidden argument _cmd to method calls */

@interface TestClass 
{
  Class isa;
}
+ (const char*) method;
@end

@implementation TestClass
+ (const char*) method;
{
  return sel_get_name (_cmd);
}
#ifdef __NEXT_RUNTIME__
+ initialize { return self; }
#endif
@end


int main (void)
{
  if (strcmp ([TestClass method], "method"))
    {
      abort ();
    }

  return 0;
}