URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [objc.dg/] [zero-link-1.m] - Rev 704
Compare with Previous | Blame | View Log
/* Check if the '-fzero-link' flag correctly emits an objc_getClass() call. */ /* Contributed by Ziemowit Laski <zlaski@apple.com>. */ /* { dg-do compile { target *-*-darwin* } } */ /* { dg-skip-if "" { *-*-* } { "-fgnu-runtime" } { "" } } */ /* { dg-options "-fzero-link" } */ #include <objc/Object.h> #include <objc/objc.h> extern void abort(void); #define CHECK_IF(expr) if(!(expr)) abort(); @interface Base: Object + (int) getValue; @end @implementation Base + (int) getValue { return 1593; } @end int main(void) { int val = [Base getValue]; CHECK_IF(val == 1593); return 0; } /* { dg-final { scan-assembler-not "_OBJC_ClassRefs_0" { target { *-*-darwin* && { ! lp64 } } } } } */ /* { dg-final { scan-assembler-not "_OBJC_ClassRef_Base" { target { *-*-darwin* && { lp64 } } } } } */ /* { dg-final { scan-assembler "objc_getClass" } } */