| 30 | |
| 31 | template <typename T> |
| 32 | inline Rcomplex Rcomplex_caster( std::complex<T> from ){ |
| 33 | Rcomplex cx ; |
| 34 | cx.r = (double)from.real() ; |
| 35 | cx.i = (double)from.imag() ; |
| 36 | return cx ; |
| 37 | } |
| 38 | |
| 39 | template <> |
| 40 | inline Rcomplex caster<std::complex<double>, Rcomplex>( std::complex<double> from){ |
no outgoing calls
no test coverage detected