URL https://opencores.org/ocsvn/or1k/or1k/trunk

Subversion Repositories or1k

[/] [or1k/] [trunk/] [newlib/] [newlib/] [libm/] [math/] [wr_lgamma.c] - Diff between revs 39 and 56

Rev 39	Rev 56
Line 40...	Line 40...
`double inf = 0.0;`	`double inf = 0.0;`

`SET_HIGH_WORD(inf,0x7ff00000); /* set inf to infinite */`	`SET_HIGH_WORD(inf,0x7ff00000); /* set inf to infinite */`
`#endif`	`#endif`
`exc.name = "lgamma";`	`exc.name = "lgamma";`
	`exc.err = 0;`
	`exc.arg1 = exc.arg2 = (double)x;`
`if (_LIB_VERSION == _SVID_)`	`if (_LIB_VERSION == _SVID_)`
`exc.retval = HUGE;`	`exc.retval = HUGE;`
`else`	`else`
`exc.retval = HUGE_VAL;`	`exc.retval = HUGE_VAL;`
`if(floor(x)==x&&x<=0.0) {`	`if(floor(x)==x&&x<=0.0) {`