ports/openmpi
ports/openmpi
1
1
Форкнуть 0
Код Релизы Активность

Remove some really old (internal) kruft that never ended up getting

Просмотр исходного кода 
used. 

This commit was SVN r24988.
Этот коммит содержится в:
Jeff Squyres 2011-08-04 15:24:37 +00:00
родитель 3d3b3d4dad
Коммит ba432393d4
1 изменённых файлов: 7 добавлений и 9 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

16
opal/mca/base/mca_base_param.c
Просмотреть файл

@ -9,7 +9,7 @@
* University of Stuttgart. All rights reserved. * University of Stuttgart. All rights reserved.
* Copyright (c) 2004-2005 The Regents of the University of California. * Copyright (c) 2004-2005 The Regents of the University of California.
* All rights reserved. * All rights reserved.
* Copyright (c) 2008 Cisco Systems, Inc. All rights reserved. * Copyright (c) 2008-2011 Cisco Systems, Inc. All rights reserved.
* $COPYRIGHT$ * $COPYRIGHT$
* *
* Additional copyrights may follow * Additional copyrights may follow
@ -112,7 +112,6 @@ static int syn_register(int index_orig, const char *syn_type_name,
const char *syn_component_name, const char *syn_component_name,
const char *syn_param_name, bool deprecated); const char *syn_param_name, bool deprecated);
static bool param_lookup(size_t index, mca_base_param_storage_t *storage, static bool param_lookup(size_t index, mca_base_param_storage_t *storage,
opal_hash_table_t *attrs,
mca_base_param_source_t *source, mca_base_param_source_t *source,
char **source_file); char **source_file);
static bool param_set_override(size_t index, static bool param_set_override(size_t index,
@ -488,7 +487,7 @@ int mca_base_param_lookup_int(int index, int *value)
{ {
mca_base_param_storage_t storage; mca_base_param_storage_t storage;
if (param_lookup(index, &storage, NULL, NULL, NULL)) { if (param_lookup(index, &storage, NULL, NULL)) {
*value = storage.intval; *value = storage.intval;
return OPAL_SUCCESS; return OPAL_SUCCESS;
} }
@ -532,7 +531,7 @@ int mca_base_param_lookup_string(int index, char **value)
{ {
mca_base_param_storage_t storage; mca_base_param_storage_t storage;
if (param_lookup(index, &storage, NULL, NULL, NULL)) { if (param_lookup(index, &storage, NULL, NULL)) {
*value = storage.stringval; *value = storage.stringval;
return OPAL_SUCCESS; return OPAL_SUCCESS;
} }
@ -561,7 +560,7 @@ int mca_base_param_lookup_source(int index, mca_base_param_source_t *source, cha
{ {
mca_base_param_storage_t storage; mca_base_param_storage_t storage;
if (param_lookup(index, &storage, NULL, source, source_file)) { if (param_lookup(index, &storage, source, source_file)) {
return OPAL_SUCCESS; return OPAL_SUCCESS;
} }
return OPAL_ERROR; return OPAL_ERROR;
@ -857,7 +856,7 @@ int mca_base_param_build_env(char ***env, int *num_env, bool internal)
} }
if (array[i].mbp_internal == internal || internal) { if (array[i].mbp_internal == internal || internal) {
if (param_lookup(i, &storage, NULL, NULL, NULL)) { if (param_lookup(i, &storage, NULL, NULL)) {
if (MCA_BASE_PARAM_TYPE_INT == array[i].mbp_type) { if (MCA_BASE_PARAM_TYPE_INT == array[i].mbp_type) {
asprintf(&str, "%s=%d", array[i].mbp_env_var_name, asprintf(&str, "%s=%d", array[i].mbp_env_var_name,
storage.intval); storage.intval);
@ -1491,7 +1490,7 @@ static int param_register(const char *type_name,
/* Finally, if we have a lookup value, look it up */ /* Finally, if we have a lookup value, look it up */
if (NULL != current_value) { if (NULL != current_value) {
if (!param_lookup(i, current_value, NULL, NULL, NULL)) { if (!param_lookup(i, current_value, NULL, NULL)) {
return OPAL_ERR_NOT_FOUND; return OPAL_ERR_NOT_FOUND;
} }
} }
@ -1515,7 +1514,7 @@ static int param_register(const char *type_name,
/* Finally, if we have a lookup value, look it up */ /* Finally, if we have a lookup value, look it up */
if (NULL != current_value) { if (NULL != current_value) {
if (!param_lookup(ret, current_value, NULL, NULL, NULL)) { if (!param_lookup(ret, current_value, NULL, NULL)) {
return OPAL_ERR_NOT_FOUND; return OPAL_ERR_NOT_FOUND;
} }
} }
@ -1685,7 +1684,6 @@ static bool param_set_override(size_t index,
* Lookup a parameter in multiple places * Lookup a parameter in multiple places
*/ */
static bool param_lookup(size_t index, mca_base_param_storage_t *storage, static bool param_lookup(size_t index, mca_base_param_storage_t *storage,
opal_hash_table_t *attrs,
mca_base_param_source_t *source_param, mca_base_param_source_t *source_param,
char **source_file) char **source_file)
{ {