gomp-20050608-branch/gcc/testsuite/gcc.dg/builtins-40.c

   1 /* Copyright (C) 2004 Free Software Foundation.
   2
   3    Check that fmod, fmodf, fmodl, drem, dremf and dreml
   4    built-in functions compile.
   5
   6    Written by Uros Bizjak, 5th May 2004.  */
   7
   8 /* { dg-do compile } */
   9 /* { dg-options "-O2 -ffast-math" } */
  10
  11 extern double fmod(double, double);
  12 extern double drem(double, double);
  13 extern float fmodf(float, float);
  14 extern float dremf(float, float);
  15 extern long double fmodl(long double, long double);
  16 extern long double dreml(long double, long double);
  17
  18
  19 double test1(double x, double y)
  20 {
  21   return fmod(x, y);
  22 }
  23
  24 double test2(double x, double y)
  25 {
  26   return drem(x, y);
  27 }
  28
  29 float test1f(float x, float y)
  30 {
  31   return fmodf(x, y);
  32 }
  33
  34 float test2f(float x, float y)
  35 {
  36   return dremf(x, y);
  37 }
  38
  39 long double test1l(long double x, long double y)
  40 {
  41   return fmodl(x, y);
  42 }
  43
  44 long double test2l(long double x, long double y)
  45 {
  46   return dreml(x, y);
  47 }