stepan
/
dynare
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

removed leaks in calcDerivatives 

git-svn-id: https://www.dynare.org/svn/dynare/trunk@3203 ac1d8469-bf42-47a9-8791-bf33cf982152
time-shift
george 2009-12-07 12:35:55 +00:00
parent cf933608d0
commit 12d7abab24
1 changed files with 11 additions and 4 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

15
mex/sources/k_order_perturbation/k_ord_dynare.cpp
View File

@ -135,8 +135,8 @@ KordpDynare::evaluateSystem(Vector &out, const Vector &yym, const Vector &yy,
void
KordpDynare::calcDerivatives(const Vector &yy, const Vector &xx) throw (DynareException)
{
TwoDMatrix *g2 = NULL;
TwoDMatrix *g3 = NULL;
TwoDMatrix *g2 = 0;// NULL;
TwoDMatrix *g3 = 0;// NULL;
TwoDMatrix *g1 = new TwoDMatrix(nY, nJcols); // generate g1 for jacobian
g1->zeros();
@ -169,10 +169,17 @@ KordpDynare::calcDerivatives(const Vector &yy, const Vector &xx) throw (DynareEx
throw DynareException(__FILE__, __LINE__, "Error in calcDerivatives: dynamicDLL.eval returned wrong jacobian");
populateDerivativesContainer(g1, 1, JacobianIndices);
delete g1;
if (nOrder > 1)
populateDerivativesContainer(g2, 2, JacobianIndices);
{
populateDerivativesContainer(g2, 2, JacobianIndices);
delete g2;
}
if (nOrder > 2)
populateDerivativesContainer(g3, 3, JacobianIndices);
{
populateDerivativesContainer(g3, 3, JacobianIndices);
delete g3;
}
}
void