Changeset 27221

Timestamp:

08/20/22 15:52:46 (3 years ago)

Author:

Eric.Larour

Message:

CHG: watchout to not wipe out a GenericParam object which is itself a pointer!

File:

• issm/branches/trunk-larour-SLPS2022/src/c/cores/sealevelchange_core.cpp (modified) (1 diff)

issm/branches/trunk-larour-SLPS2022/src/c/cores/sealevelchange_core.cpp

@@ -708 +708 @@
 void              sealevelchange_finalize(FemModel* femmodel) {  /*{{{*/
 
+        bool isuq=false;
+        
         BarystaticContributions* barycontrib=NULL;
         GenericParam<BarystaticContributions*>* barycontribparam=NULL;
         
-        /*Erase barycontrib object: */
-        barycontribparam = xDynamicCast<GenericParam<BarystaticContributions*>*>(femmodel->parameters->FindParamObject(BarystaticContributionsEnum));
-        barycontrib=barycontribparam->GetParameterValue();
-        delete barycontrib;
+        femmodel->parameters->FindParam(&isuq,QmuIsdakotaEnum);
+
+        if(isuq){
+                //reset barycontrib object:
+                barycontribparam = xDynamicCast<GenericParam<BarystaticContributions*>*>(femmodel->parameters->FindParamObject(BarystaticContributionsEnum));
+                barycontrib=barycontribparam->GetParameterValue(); 
+                barycontrib->Reset();
+        }
+        else {
+                /*Erase barycontrib object: */
+                barycontribparam = xDynamicCast<GenericParam<BarystaticContributions*>*>(femmodel->parameters->FindParamObject(BarystaticContributionsEnum));
+                barycontrib=barycontribparam->GetParameterValue();
+                delete barycontrib;
+        }
 
         return;