Fix small leak in NetworkIBModel::NetworkIBMode()

diff --git a/src/simgrid/sg_config.c b/src/simgrid/sg_config.c
index efe5bf2..9117342 100644 (file)
--- a/src/simgrid/sg_config.c
+++ b/src/simgrid/sg_config.c
@@ -836,12 +836,12 @@ void sg_config_init(int *argc, char **argv)
                      "Latency factors for smpi.",
                      xbt_cfgelm_string, 1, 1, NULL, NULL);
     xbt_cfg_setdefault_string(_sg_cfg_set, "smpi/lat_factor", "65472:11.6436;15424:3.48845;9376:2.59299;5776:2.18796;3484:1.88101;1426:1.61075;732:1.9503;257:1.95341;0:2.01467");
-        
+
     xbt_cfg_register(&_sg_cfg_set, "smpi/IB_penalty_factors",
                      "Correction factor to communications using Infiniband model with contention (default value based on Stampede cluster profiling)",
                      xbt_cfgelm_string, 1, 1, NULL, NULL);
     xbt_cfg_setdefault_string(_sg_cfg_set, "smpi/IB_penalty_factors", "0.965;0.925;1.35");
-    
+
     xbt_cfg_register(&_sg_cfg_set, "smpi/os",
                      "Small messages timings (MPI_Send minimum time for small messages)",
                      xbt_cfgelm_string, 1, 1, NULL, NULL);

diff --git a/src/surf/network_ib.cpp b/src/surf/network_ib.cpp
index f19aa4b..de303c9 100644 (file)
--- a/src/surf/network_ib.cpp
+++ b/src/surf/network_ib.cpp
@@ -105,6 +105,8 @@ NetworkIBModel::NetworkIBModel()
   Be = atof(xbt_dynar_get_as(radical_elements, 0, char *));
   Bs = atof(xbt_dynar_get_as(radical_elements, 1, char *));
   ys = atof(xbt_dynar_get_as(radical_elements, 2, char *));
+
+  xbt_dynar_free(&radical_elements);
 }
 
 NetworkIBModel::~NetworkIBModel()