From d5909421a98105441c247a8922a30d1602cea41e Mon Sep 17 00:00:00 2001 From: Jeff Squyres Date: Thu, 25 Aug 2005 16:37:24 +0000 Subject: [PATCH] Register the priority param in open so that ompi_info can see it This commit was SVN r7034. --- orte/mca/ras/slurm/ras_slurm_component.c | 26 +++++++++++++++++++----- 1 file changed, 21 insertions(+), 5 deletions(-) diff --git a/orte/mca/ras/slurm/ras_slurm_component.c b/orte/mca/ras/slurm/ras_slurm_component.c index 22fec69115..a99e359f61 100644 --- a/orte/mca/ras/slurm/ras_slurm_component.c +++ b/orte/mca/ras/slurm/ras_slurm_component.c @@ -22,9 +22,16 @@ #include "ras_slurm.h" +/* + * Local variables + */ +static int param_priority; + + /* * Local functions */ +static int ras_slurm_open(void); static orte_ras_base_module_t *ras_slurm_init(int*); @@ -47,7 +54,7 @@ orte_ras_base_component_1_0_0_t mca_ras_slurm_component = { /* Component open and close functions */ - NULL, + ras_slurm_open, NULL }, @@ -61,15 +68,24 @@ orte_ras_base_component_1_0_0_t mca_ras_slurm_component = { }; +static int ras_slurm_open(void) +{ + param_priority = + mca_base_param_reg_int(&mca_ras_slurm_component.ras_version, + "priority", + "Priority of the slurm ras component", + false, false, 100, NULL); + + return ORTE_SUCCESS; +} + + static orte_ras_base_module_t *ras_slurm_init(int* priority) { /* Are we running under a SLURM job? */ - mca_base_param_reg_int(&mca_ras_slurm_component.ras_version, "priority", - "Priority of the slurm ras component", - false, false, 100, priority); - if (NULL != getenv("SLURM_JOBID")) { + mca_base_param_lookup_int(param_priority, priority); opal_output(orte_ras_base.ras_output, "ras:slurm: available for selection"); return &orte_ras_slurm_module;