Subversion Repositories openrisc

/* Test for <tgmath.h> in C99. */
/* Origin: Matt Austern <austern@apple.com>
/* { dg-do compile { target c99_runtime } } */
/* { dg-options "-std=iso9899:1999" } */
/* { dg-add-options c99_runtime } */
/* { dg-skip-if "<complex.h> missing" { alpha*-dec-osf5* } } */
 
/* Test that invoking type-generic exp on a complex invokes cexp. */
#include <tgmath.h>
 
complex double foo(complex double x)
{
  return exp(x);
}
 
/* { dg-final { scan-assembler "cexp" } } */