X-Git-Url: http://info.iut-bm.univ-fcomte.fr/pub/gitweb/simgrid.git/blobdiff_plain/1d381feb9b44e9d94e608c9b389c453128d44dff..84402e8e2ee2a2d0bef25fdceb0a263ed8b471f6:/src/smpi/internals/smpi_actor.cpp diff --git a/src/smpi/internals/smpi_actor.cpp b/src/smpi/internals/smpi_actor.cpp index 8e6f16cd64..c29d78792e 100644 --- a/src/smpi/internals/smpi_actor.cpp +++ b/src/smpi/internals/smpi_actor.cpp @@ -1,4 +1,4 @@ -/* Copyright (c) 2009-2019. The SimGrid Team. All rights reserved. */ +/* Copyright (c) 2009-2020. The SimGrid Team. All rights reserved. */ /* This program is free software; you can redistribute it and/or modify it * under the terms of the license (GNU LGPL) which comes with this package. */ @@ -36,7 +36,7 @@ ActorExt::ActorExt(s4u::Actor* actor) : actor_(actor) MC_ignore_heap(timer_, xbt_os_timer_size()); #if HAVE_PAPI - if (not simgrid::config::get_value("smpi/papi-events").empty()) { + if (not smpi_cfg_papi_events_file().empty()) { // TODO: Implement host/process/thread based counters. This implementation // just always takes the values passed via "default", like this: // "default:COUNTER1:COUNTER2:COUNTER3;". @@ -55,6 +55,8 @@ ActorExt::ActorExt(s4u::Actor* actor) : actor_(actor) ActorExt::~ActorExt() { + if (info_env_ != MPI_INFO_NULL) + simgrid::smpi::Info::unref(info_env_); if (comm_self_ != MPI_COMM_NULL) simgrid::smpi::Comm::destroy(comm_self_); if (comm_intra_ != MPI_COMM_NULL) @@ -213,7 +215,7 @@ void ActorExt::init() xbt_assert(smpi_get_universe_size() != 0, "SimGrid was not initialized properly before entering MPI_Init. " "Aborting, please check compilation process and use smpirun."); - simgrid::s4u::ActorPtr self = simgrid::s4u::Actor::self(); + simgrid::s4u::Actor* self = simgrid::s4u::Actor::self(); // cheinrich: I'm not sure what the impact of the SMPI_switch_data_segment on this call is. I moved // this up here so that I can set the privatized region before the switch. ActorExt* ext = smpi_process(); @@ -221,7 +223,7 @@ void ActorExt::init() if (ext->initialized()) return; - if (smpi_privatize_global_variables == SmpiPrivStrategies::MMAP) { + if (smpi_cfg_privatization() == SmpiPrivStrategies::MMAP) { /* Now using the segment index of this process */ ext->set_privatized_region(smpi_init_global_memory_segment_process()); /* Done at the process's creation */