OSDN Git Service

In gcc/testsuite/:
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / objc.dg / zero-link-2.m
1 /* Check if the '-fno-zero-link' flag correctly _omits_ an objc_getClass() call. */
2 /* Contributed by Ziemowit Laski <zlaski@apple.com>.  */
3
4 /* { dg-do compile { target *-*-darwin* } } */
5 /* { dg-skip-if "" { *-*-* } { "-fgnu-runtime" } { "" } } */
6 /* { dg-options "-fno-zero-link" } */
7
8 #include "../objc-obj-c++-shared/Object1.h"
9 #include <objc/objc.h>
10
11 extern void abort(void);
12 #define CHECK_IF(expr) if(!(expr)) abort();
13
14 @interface Base: Object
15 + (int) getValue;
16 @end
17
18 @implementation Base
19 + (int) getValue { return 1593; }
20 @end
21
22 int main(void) {
23   int val = [Base getValue];
24   CHECK_IF(val == 1593);
25   return 0;
26 }
27
28 /* { dg-final { scan-assembler "_OBJC_CLASS_REFERENCES_0" } } */
29 /* { dg-final { scan-assembler-not "objc_getClass" } } */