File: sf_infinity.c

package info (click to toggle)
picolibc 1.5.1-2
  • links: PTS, VCS
  • area: main
  • in suites: bullseye
  • size: 27,124 kB
  • sloc: ansic: 266,005; asm: 22,255; perl: 2,388; sh: 1,016; python: 994; exp: 282; makefile: 94; xml: 39
file content (31 lines) | stat: -rw-r--r-- 562 bytes parent folder | download
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
/*
Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.

Developed at SunPro, a Sun Microsystems, Inc. business.
Permission to use, copy, modify, and distribute this
software is freely granted, provided that this notice 
is preserved.
 */
/*
 * infinityf () returns the representation of infinity.
 * Added by Cygnus Support.
 */

#include "fdlibm.h"

	float infinityf()
{
	float x;

	SET_FLOAT_WORD(x,0x7f800000);
	return x;
}

#ifdef _DOUBLE_IS_32BITS

	double infinity()
{
	return (double) infinityf();
}

#endif /* defined(_DOUBLE_IS_32BITS) */