/math/test-tgmath-int.c

https://github.com/nitinkamble/x32-glibc · C · 71 lines · 42 code · 10 blank · 19 comment · 3 complexity · 341343218688bada06ad3092caafb79b MD5 · raw file 

    

  1. /* Test compilation of tgmath macros.
    2. 

  2.    Copyright (C) 2005 Free Software Foundation, Inc.
    3. 

  3.    This file is part of the GNU C Library.
    4. 

  4.    Contributed by Andreas Jaeger <aj@suse.de>, 2005.
    5. 

    6. 

  6.    The GNU C Library is free software; you can redistribute it and/or
    7. 

  7.    modify it under the terms of the GNU Lesser General Public
    8. 

  8.    License as published by the Free Software Foundation; either
    9. 

  9.    version 2.1 of the License, or (at your option) any later version.
    10. 

    11. 

  11.    The GNU C Library is distributed in the hope that it will be useful,
    12. 

  12.    but WITHOUT ANY WARRANTY; without even the implied warranty of
    13. 

  13.    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
    14. 

  14.    Lesser General Public License for more details.
    15. 

    16. 

  16.    You should have received a copy of the GNU Lesser General Public
    17. 

  17.    License along with the GNU C Library; if not, write to the Free
    18. 

  18.    Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA
    19. 

  19.    02111-1307 USA.  */
    20. 

  20. 

  21. #include <math.h>
    22. 

  22. #include <complex.h>
    23. 

  23. #include <tgmath.h>
    24. 

  24. #include <stdio.h>
    25. 

  25. 

  26. static int errors = 0;
    27. 

  27. 

  28. static void
    29. 

  29. our_error (const char *c)
    30. 

  30. {
    31. 

  31.   puts (c);
    32. 

  32.   ++errors;
    33. 

  33. }
    34. 

  34. 

  35. #define CHECK_RET_CONST_TYPE(func, rettype, name)			\
    36. 

  36.   if (sizeof (func) != sizeof (rettype))				\
    37. 

  37.     our_error ("Return size of " #name " is " #func" wrong");
    38. 

  38. 

  39. #define CHECK_RET_CONST_FLOAT(func, name)		\
    40. 

  40.   CHECK_RET_CONST_TYPE (func, float, name)
    41. 

  41. 

  42. #define CHECK_RET_CONST_DOUBLE(func, name)		\
    43. 

  43.   CHECK_RET_CONST_TYPE (func, double, name)
    44. 

  44. 

  45. static int
    46. 

  46. do_test (void)
    47. 

  47. {
    48. 

  48.   int i;
    49. 

  49.   float f;
    50. 

  50.   double d;
    51. 

  51. 

  52.   CHECK_RET_CONST_DOUBLE (sin (i), "sin (i)");
    53. 

  53.   CHECK_RET_CONST_DOUBLE (pow (i, i), "pow (i, i)");
    54. 

  54.   CHECK_RET_CONST_DOUBLE (pow (i, i), "pow (i, i)");
    55. 

  55.   CHECK_RET_CONST_DOUBLE (pow (i, f), "pow (i, f)");
    56. 

  56.   CHECK_RET_CONST_DOUBLE (pow (i, d), "pow (i, d)");
    57. 

  57.   CHECK_RET_CONST_DOUBLE (pow (f, i), "pow (f, i)");
    58. 

  58.   CHECK_RET_CONST_DOUBLE (pow (d, i), "pow (d, i)");
    59. 

  59.   CHECK_RET_CONST_DOUBLE (fma (i, i, i), "fma (i, i, i)");
    60. 

  60.   CHECK_RET_CONST_DOUBLE (fma (f, i, i), "fma (f, i, i)");
    61. 

  61.   CHECK_RET_CONST_DOUBLE (fma (i, f, i), "fma (i, f, i)");
    62. 

  62.   CHECK_RET_CONST_DOUBLE (fma (i, i, f), "fma (i, i, f)");
    63. 

  63.   CHECK_RET_CONST_DOUBLE (fma (d, i, i), "fma (d, i, i)");
    64. 

  64.   CHECK_RET_CONST_DOUBLE (fma (i, d, i), "fma (i, d, i)");
    65. 

  65.   CHECK_RET_CONST_DOUBLE (fma (i, i, d), "fma (i, i, d)");
    66. 

  66. 

  67.   return errors != 0;
    68. 

  68. }
    69. 

  69. 

  70. #define TEST_FUNCTION do_test ()
    71. 

  71. #include "../test-skeleton.c"
    72.