ieee754.c 2.9 KB

1234567891011121314151617181920212223242526272829303132333435363738394041424344454647484950515253545556575859606162636465666768697071727374757677787980818283
  1. // SPDX-License-Identifier: GPL-2.0-only
  2. /* ieee754 floating point arithmetic
  3. * single and double precision
  4. *
  5. * BUGS
  6. * not much dp done
  7. * doesn't generate IEEE754_INEXACT
  8. */
  9. /*
  10. * MIPS floating point support
  11. * Copyright (C) 1994-2000 Algorithmics Ltd.
  12. */
  13. #include <linux/compiler.h>
  14. #include "ieee754.h"
  15. #include "ieee754sp.h"
  16. #include "ieee754dp.h"
  17. /*
  18. * Special constants
  19. */
  20. /*
  21. * Older GCC requires the inner braces for initialization of union ieee754dp's
  22. * anonymous struct member. Without an error will result.
  23. */
  24. #define xPCNST(s, b, m, ebias) \
  25. { \
  26. { \
  27. .sign = (s), \
  28. .bexp = (b) + ebias, \
  29. .mant = (m) \
  30. } \
  31. }
  32. #define DPCNST(s, b, m) \
  33. xPCNST(s, b, m, DP_EBIAS)
  34. const union ieee754dp __ieee754dp_spcvals[] = {
  35. DPCNST(0, DP_EMIN - 1, 0x0000000000000ULL), /* + zero */
  36. DPCNST(1, DP_EMIN - 1, 0x0000000000000ULL), /* - zero */
  37. DPCNST(0, 0, 0x0000000000000ULL), /* + 1.0 */
  38. DPCNST(1, 0, 0x0000000000000ULL), /* - 1.0 */
  39. DPCNST(0, 3, 0x4000000000000ULL), /* + 10.0 */
  40. DPCNST(1, 3, 0x4000000000000ULL), /* - 10.0 */
  41. DPCNST(0, DP_EMAX + 1, 0x0000000000000ULL), /* + infinity */
  42. DPCNST(1, DP_EMAX + 1, 0x0000000000000ULL), /* - infinity */
  43. DPCNST(0, DP_EMAX + 1, 0x7FFFFFFFFFFFFULL), /* + ind legacy qNaN */
  44. DPCNST(0, DP_EMAX + 1, 0x8000000000000ULL), /* + indef 2008 qNaN */
  45. DPCNST(0, DP_EMAX, 0xFFFFFFFFFFFFFULL), /* + max */
  46. DPCNST(1, DP_EMAX, 0xFFFFFFFFFFFFFULL), /* - max */
  47. DPCNST(0, DP_EMIN, 0x0000000000000ULL), /* + min normal */
  48. DPCNST(1, DP_EMIN, 0x0000000000000ULL), /* - min normal */
  49. DPCNST(0, DP_EMIN - 1, 0x0000000000001ULL), /* + min denormal */
  50. DPCNST(1, DP_EMIN - 1, 0x0000000000001ULL), /* - min denormal */
  51. DPCNST(0, 31, 0x0000000000000ULL), /* + 1.0e31 */
  52. DPCNST(0, 63, 0x0000000000000ULL), /* + 1.0e63 */
  53. };
  54. #define SPCNST(s, b, m) \
  55. xPCNST(s, b, m, SP_EBIAS)
  56. const union ieee754sp __ieee754sp_spcvals[] = {
  57. SPCNST(0, SP_EMIN - 1, 0x000000), /* + zero */
  58. SPCNST(1, SP_EMIN - 1, 0x000000), /* - zero */
  59. SPCNST(0, 0, 0x000000), /* + 1.0 */
  60. SPCNST(1, 0, 0x000000), /* - 1.0 */
  61. SPCNST(0, 3, 0x200000), /* + 10.0 */
  62. SPCNST(1, 3, 0x200000), /* - 10.0 */
  63. SPCNST(0, SP_EMAX + 1, 0x000000), /* + infinity */
  64. SPCNST(1, SP_EMAX + 1, 0x000000), /* - infinity */
  65. SPCNST(0, SP_EMAX + 1, 0x3FFFFF), /* + indef legacy quiet NaN */
  66. SPCNST(0, SP_EMAX + 1, 0x400000), /* + indef 2008 quiet NaN */
  67. SPCNST(0, SP_EMAX, 0x7FFFFF), /* + max normal */
  68. SPCNST(1, SP_EMAX, 0x7FFFFF), /* - max normal */
  69. SPCNST(0, SP_EMIN, 0x000000), /* + min normal */
  70. SPCNST(1, SP_EMIN, 0x000000), /* - min normal */
  71. SPCNST(0, SP_EMIN - 1, 0x000001), /* + min denormal */
  72. SPCNST(1, SP_EMIN - 1, 0x000001), /* - min denormal */
  73. SPCNST(0, 31, 0x000000), /* + 1.0e31 */
  74. SPCNST(0, 63, 0x000000), /* + 1.0e63 */
  75. };