[Rcpp-commits] r2140 - pkg/RcppArmadillo/inst/include
noreply at r-forge.r-project.org
noreply at r-forge.r-project.org
Tue Sep 21 17:46:45 CEST 2010
Author: edd
Date: 2010-09-21 17:46:45 +0200 (Tue, 21 Sep 2010)
New Revision: 2140
Modified:
pkg/RcppArmadillo/inst/include/RcppArmadilloWrap.h
Log:
and once more switch to using get_n_rows() and get_n_cols()
Modified: pkg/RcppArmadillo/inst/include/RcppArmadilloWrap.h
===================================================================
--- pkg/RcppArmadillo/inst/include/RcppArmadilloWrap.h 2010-09-21 15:45:00 UTC (rev 2139)
+++ pkg/RcppArmadillo/inst/include/RcppArmadilloWrap.h 2010-09-21 15:46:45 UTC (rev 2140)
@@ -120,8 +120,8 @@
template <typename T1, typename eop_type>
SEXP wrap_eop( const arma::eOp<T1,eop_type>& X, ::Rcpp::traits::false_type ){
- int n_rows = X.P.n_rows ;
- int n_cols = X.P.n_cols ;
+ int n_rows = X.P.get_n_rows();
+ int n_cols = X.P.get_n_cols();
typedef typename ::Rcpp::Vector< ::Rcpp::traits::r_sexptype_traits< typename T1::elem_type>::rtype > VECTOR ;
VECTOR res(::Rcpp::Dimension( n_rows , n_cols )) ;
::arma::Mat<typename T1::elem_type> result( res.begin(), n_rows, n_cols, false ) ;
More information about the Rcpp-commits
mailing list