URL https://opencores.org/ocsvn/hf-risc/hf-risc/trunk

Subversion Repositories hf-risc

[/] [hf-risc/] [trunk/] [tools/] [riscv-gnu-toolchain-master/] [glibc/] [sysdeps/] [riscv/] [fpu/] [s_fdim.c] - Blame information for rev 13

Details | Compare with Previous | View Log


#include <errno.h>
#include <math.h>
#include "fpu_control.h"
 
double __fdim (double x, double y)
{
  double diff = x - y;
 
  if (x <= y)
    return 0.0;
 
#ifdef __riscv_soft_float
  if (isinf(diff))
    errno = ERANGE;
#else
  if (__builtin_expect(_FCLASS(diff) & _FCLASS_INF, 0))
    errno = ERANGE;
#endif
 
  return diff;
}
weak_alias (__fdim, fdim)

Line No.	Rev	Author	Line
1	13	serginhofr	`#include <errno.h>`
2			`#include <math.h>`
3			`#include "fpu_control.h"`
4
5			`double __fdim (double x, double y)`
6			`{`
7			`double diff = x - y;`
8
9			`if (x <= y)`
10			`return 0.0;`
11
12			`#ifdef __riscv_soft_float`
13			`if (isinf(diff))`
14			`errno = ERANGE;`
15			`#else`
16			`if (__builtin_expect(_FCLASS(diff) & _FCLASS_INF, 0))`
17			`errno = ERANGE;`
18			`#endif`
19
20			`return diff;`
21			`}`
22			`weak_alias (__fdim, fdim)`

Browse

Tools

Subversion Repositories hf-risc

[/] [hf-risc/] [trunk/] [tools/] [riscv-gnu-toolchain-master/] [glibc/] [sysdeps/] [riscv/] [fpu/] [s_fdim.c] - Blame information for rev 13