Subversion Repositories openrisc

/* Copyright (C) 2007  Free Software Foundation.
 
   Verify that nearbyint isn't transformed into e.g. rint or lrint
   when -ftrapping-math is set.
 
   Written by Kaveh ghazi, 2007-03-04.  */
 
/* { dg-do compile } */
/* { dg-options "-ftrapping-math -fdump-tree-original" } */
/* { dg-options "-ftrapping-math -fdump-tree-original -mmacosx-version-min=10.3" { target powerpc-*-darwin* } } */
/* { dg-options "-ftrapping-math -fdump-tree-original -std=c99" { target *-*-solaris2* } } */
 
#include "../builtins-config.h"
 
extern void bar (long);
 
#define TESTIT(FUNC) do { \
  bar (__builtin_##FUNC(d)); \
  bar (__builtin_##FUNC##f(f)); \
  bar (__builtin_##FUNC##l(ld)); \
} while (0)
 
void __attribute__ ((__noinline__)) foo (double d, float f, long double ld)
{
  TESTIT(nearbyint);
}
 
int main()
{
  foo (1.0, 2.0, 3.0);
  return 0;
}
 
/* { dg-final { scan-tree-dump-times "nearbyint " 1 "original" } } */
/* { dg-final { scan-tree-dump-times "nearbyintf" 1 "original" } } */
/* { dg-final { scan-tree-dump-times "nearbyintl" 1 "original" } } */
/* { dg-final { cleanup-tree-dump "original" } } */