Subversion Repositories openrisc

/* Contributed by Nicola Pero <nicola.pero@meta-innovation.com>, May 2011.  */
/* { dg-do run } */
/* { dg-skip-if "No API#2 pre-Darwin9" { *-*-darwin[5-8]* } { "-fnext-runtime" } { "" } } */
 
#include <objc/runtime.h>
#include <stdlib.h>
 
int main(int argc, void **args)
{
#ifdef __GNU_LIBOBJC__
  /* This special test tests that, if you have a selector already
     registered in the runtime with full type information, you can use
     sel_registerTypedName() to get it even if you specify the type
     with incorrect argframe information.  This is helpful as
     selectors generated by the compiler (which have correct argframe
     information) are usually registered before hand-written ones
     (which often have incorrect argframe information, but need the
     correct one).
 
     Note that in this hand-written test, even the type information of
     the first selector may be wrong (on this machine); but that's OK
     as we'll never actually use the selectors.  */
  SEL selector1 = sel_registerTypedName ("testMethod", "i8@0:4");
  SEL selector2 = sel_registerTypedName ("testMethod", "i8@8:8");
 
  /* We compare the selectors using ==, not using sel_isEqual().  This
     is because we are testing internals of the runtime and we know
     that in the current implementation they should be identical if
     the stuff is to work as expected.  Don't do this at home.  */
  if (selector1 != selector2)
    abort ();
#endif
 
  return 0;
}