From d6329d0300cf330fae50b54ba71f26107da6fb45 Mon Sep 17 00:00:00 2001
From: Danny Auble <da@llnl.gov>
Date: Wed, 31 Aug 2005 23:12:44 +0000
Subject: [PATCH] mods for mpirun env vars
---
src/common/env.c | 18 +++++++++++++-----
1 file changed, 13 insertions(+), 5 deletions(-)
diff --git a/src/common/env.c b/src/common/env.c
index e4041efe9de..d68f533d2e7 100644
--- a/src/common/env.c
+++ b/src/common/env.c
@@ -275,13 +275,21 @@ int setup_env(env_t *env)
if(env->select_jobinfo) {
select_g_get_jobinfo(env->select_jobinfo,
SELECT_DATA_PART_ID, &bgl_part_id);
- if (bgl_part_id
- && setenvf(&env->env,
- "MPIRUN_PARTITION", "%s", bgl_part_id)) {
+ if (bgl_part_id) {
+ if(setenvf(&env->env,
+ "MPIRUN_PARTITION", "%s", bgl_part_id))
+ rc = SLURM_FAILURE;
+
+ if(setenvf(&env->env, "MPIRUN_NOFREE", "%d", 1))
+ rc = SLURM_FAILURE;
+ if(setenvf(&env->env, "MPIRUN_NOALLOCATE", "%d", 1))
+ rc = SLURM_FAILURE;
+ } else
+ rc = SLURM_FAILURE;
+
+ if(rc == SLURM_FAILURE)
error("Can't set MPIRUN_PARTITION "
"environment variable");
- rc = SLURM_FAILURE;
- }
xfree(bgl_part_id);
}
--
GitLab