1
1
- Update to new MCA param API
- Update to new #include format

This commit was SVN r7007.
Этот коммит содержится в:
Jeff Squyres 2005-08-24 18:37:28 +00:00
родитель 72d2abe72e
Коммит 018504480a
2 изменённых файлов: 15 добавлений и 12 удалений

Просмотреть файл

@ -16,9 +16,9 @@
#include "orte_config.h"
#include "include/orte_constants.h"
#include "mca/base/base.h"
#include "mca/base/mca_base_param.h"
#include "opal/mca/base/base.h"
#include "opal/mca/base/mca_base_param.h"
#include "orte/include/orte_constants.h"
#include "ras_tm.h"
@ -64,16 +64,19 @@ orte_ras_base_component_1_0_0_t mca_ras_tm_component = {
static orte_ras_base_module_t *ras_tm_init(int* priority)
{
/* Are we running under a TM job? */
int id = mca_base_param_register_int("ras","tm","priority",NULL,100);
mca_base_param_lookup_int(id,priority);
mca_base_param_register_int(&mca_ras_tm_component.ras_version,
"priority",
"Priority of the tm ras component",
false, false, 100, priority);
if (NULL != getenv("PBS_ENVIRONMENT") &&
NULL != getenv("PBS_JOBID")) {
opal_output(orte_ras_base.ras_output, "ras:tm: available for selection");
opal_output(orte_ras_base.ras_output,
"ras:tm: available for selection");
return &orte_ras_tm_module;
}
/* Sadly, no */
opal_output(orte_ras_base.ras_output, "ras:tm: NOT available for selection");
opal_output(orte_ras_base.ras_output,
"ras:tm: NOT available for selection");
return NULL;
}

Просмотреть файл

@ -21,12 +21,12 @@
#include "tm.h"
#include "include/orte_constants.h"
#include "include/orte_types.h"
#include "opal/util/argv.h"
#include "opal/util/output.h"
#include "mca/ras/base/base.h"
#include "mca/ras/base/ras_base_node.h"
#include "orte/include/orte_constants.h"
#include "orte/include/orte_types.h"
#include "orte/mca/ras/base/base.h"
#include "orte/mca/ras/base/ras_base_node.h"
#include "ras_tm.h"