[Lme4-commits] r1765 - pkg/lme4/src

[noreply at r-forge.r-project.org]

Author: dmbates
Date: 2012-06-05 22:39:48 +0200 (Tue, 05 Jun 2012)
New Revision: 1765

Modified:
   pkg/lme4/src/predModule.cpp
Log:
Avoid use of Dimension object which causes problems with -ltcmalloc


Modified: pkg/lme4/src/predModule.cpp
===================================================================
--- pkg/lme4/src/predModule.cpp	2012-06-05 20:39:11 UTC (rev 1764)
+++ pkg/lme4/src/predModule.cpp	2012-06-05 20:39:48 UTC (rev 1765)
@@ -102,7 +102,8 @@
 	const SpMatrixd d_Lambda(d_Lambdat.adjoint());
 	for (int i = 0; i < nf; i++) {
 	    int         ncti(nct[i]), nli(nl[i]);
-	    Rcpp::NumericVector ansi(Rcpp::Dimension(ncti, ncti, nli));
+	    Rcpp::NumericVector ansi(ncti * ncti * nli);
+	    ansi.attr("dim") = Rcpp::IntegerVector::create(ncti, ncti, nli);
 	    ans[i] = ansi;
 	    const MiVec trms(as<MiVec>(trmlst(i)));
 	    if (trms.size() == 1) { // simple case