[Yuima-commits] r675 - pkg/yuima/src

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

Author: lorenzo
Date: 2018-07-18 10:19:47 +0200 (Wed, 18 Jul 2018)
New Revision: 675

Modified:
   pkg/yuima/src/IntensityEval.cpp
Log:


Modified: pkg/yuima/src/IntensityEval.cpp
===================================================================
--- pkg/yuima/src/IntensityEval.cpp	2018-07-18 08:11:31 UTC (rev 674)
+++ pkg/yuima/src/IntensityEval.cpp	2018-07-18 08:19:47 UTC (rev 675)
@@ -146,7 +146,7 @@
             List dNAll = myenvd1.get(dumdN);
             NumericVector dN = dNAll[t];
             if(dN.size()==0){
-              NumericVector dN[0] = {0};
+              dN[0] = 0;
             }
             Language eval_call( "eval", Integrand2expr[i], myenvd1);
             SEXP X = Rf_eval( eval_call, myenvd1);