URL
https://opencores.org/ocsvn/openrisc/openrisc/trunk
Subversion Repositories openrisc
[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.dg/] [builtins-55.c] - Rev 716
Go to most recent revision | Compare with Previous | Blame | View Log
/* { dg-do link } */ /* { dg-options "-O2 -ffast-math" } */ /* { dg-add-options c99_runtime } */ #include "builtins-config.h" void link_error (void); extern long lround(double); extern long lrint(double); extern long long llround(double); extern long long llrint(double); extern long lroundf(float); extern long lrintf(float); extern long long llroundf(float); extern long long llrintf(float); extern long lroundl(long double); extern long lrintl(long double); extern long long llroundl(long double); extern long long llrintl(long double); void test(double x) { #ifdef HAVE_C99_RUNTIME if (sizeof(long) != sizeof(long long)) return; if (__builtin_lceil(x) != __builtin_llceil(x)) link_error(); if (__builtin_lfloor(x) != __builtin_llfloor(x)) link_error(); if (lround(x) != llround(x)) link_error(); if (lrint(x) != llrint(x)) link_error(); #endif } void testf(float x) { #ifdef HAVE_C99_RUNTIME if (sizeof(long) != sizeof(long long)) return; if (__builtin_lceilf(x) != __builtin_llceilf(x)) link_error(); if (__builtin_lfloorf(x) != __builtin_llfloorf(x)) link_error(); if (lroundf(x) != llroundf(x)) link_error(); if (lrintf(x) != llrintf(x)) link_error(); #endif } void testl(long double x) { #ifdef HAVE_C99_RUNTIME if (sizeof(long) != sizeof(long long)) return; if (__builtin_lceill(x) != __builtin_llceill(x)) link_error(); if (__builtin_lfloorl(x) != __builtin_llfloorl(x)) link_error(); if (lroundl(x) != llroundl(x)) link_error(); if (lrintl(x) != llrintl(x)) link_error(); #endif } int main() { test(0.0); testf(0.0); testl(0.0); return 0; }
Go to most recent revision | Compare with Previous | Blame | View Log