Mercurial > hg > octave-nkf
comparison liboctave/lo-mappers.cc @ 11010:9478b216752e
simplify more array tests
| author | Jaroslav Hajek <highegg@gmail.com> |
|---|---|
| date | Wed, 22 Sep 2010 07:06:25 +0200 |
| parents | 4d1fc073fbb7 |
| children | 94d9d412a2a0 |
comparison
equal
deleted
inserted
replaced
| 11009:064aaf82222f | 11010:9478b216752e |
|---|---|
| 700 | 700 |
| 701 FloatComplex rc_sqrt (float x) | 701 FloatComplex rc_sqrt (float x) |
| 702 { | 702 { |
| 703 return x < 0.0f ? FloatComplex (0.0f, sqrtf (-x)) : FloatComplex (sqrtf (x)); | 703 return x < 0.0f ? FloatComplex (0.0f, sqrtf (-x)) : FloatComplex (sqrtf (x)); |
| 704 } | 704 } |
| 705 | |
| 706 bool xnegative_sign (double x) | |
| 707 { return __lo_ieee_signbit (x); } | |
| 708 | |
| 709 bool xnegative_sign (float x) | |
| 710 { return __lo_ieee_float_signbit (x); } |