From d4122a2d85e935b31a6bd1bf5907ceff9059dc0c Mon Sep 17 00:00:00 2001 From: Willi Braun Date: Tue, 24 Apr 2018 00:38:41 +0200 Subject: [PATCH] [Runtime] fix some debug outputs in kinsol solver Belonging to [master]: - OpenModelica/OMCompiler#2388 --- SimulationRuntime/c/simulation/solver/kinsolSolver.c | 9 ++++----- 1 file changed, 4 insertions(+), 5 deletions(-) diff --git a/SimulationRuntime/c/simulation/solver/kinsolSolver.c b/SimulationRuntime/c/simulation/solver/kinsolSolver.c index 0440442ecb..f73a228513 100644 --- a/SimulationRuntime/c/simulation/solver/kinsolSolver.c +++ b/SimulationRuntime/c/simulation/solver/kinsolSolver.c @@ -139,7 +139,7 @@ static void nlsKinsolJacSumDense(DlsMat mat); int checkReturnFlag(int flag) { - int retVal; + int retVal = flag; switch(flag) { case KIN_SUCCESS: @@ -599,7 +599,8 @@ void nlsKinsolJacSumDense(DlsMat mat) int i,j; double sum; - for(i=0; iM; ++i,sum=0.0){ + for(i=0; iM; ++i){ + sum = 0.0; for(j=0; jN;++j){ sum += fabs(DENSE_ELEM(mat,j,i)); } @@ -787,7 +788,7 @@ void nlsKinsolFScaling(DATA* data, NLS_KINSOL_DATA *kinsolData, NONLINEAR_SYSTEM } static -int nlsKinsolConfigPrint(NLS_KINSOL_DATA *kinsolData, NONLINEAR_SYSTEM_DATA *nlsData) +void nlsKinsolConfigPrint(NLS_KINSOL_DATA *kinsolData, NONLINEAR_SYSTEM_DATA *nlsData) { int retValue; double fNorm; @@ -816,8 +817,6 @@ int nlsKinsolConfigPrint(NLS_KINSOL_DATA *kinsolData, NONLINEAR_SYSTEM_DATA *nls infoStreamPrint(LOG_NLS_V, 0, "KINSOL linear solver %d", kinsolData->linearSolverMethod); messageClose(LOG_NLS_V); - - return retValue; } static