| 43 | typedef typename traits::storage_type<RTYPE>::type STORAGE ; |
| 44 | typedef typename unary_minus_result_type<RTYPE>::type RESULT ; |
| 45 | inline RESULT apply( STORAGE x ) const { |
| 46 | return Rcpp::traits::is_na<RTYPE>(x) ? x : ( -x ) ; |
| 47 | } |
| 48 | } ; |
| 49 | template <int RTYPE> |
| 50 | class unary_minus<RTYPE,false> { |