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

Remove a bunch of unused variables.

Просмотр исходного кода 
This commit was SVN r28213.
Этот коммит содержится в:
George Bosilca 2013-03-26 14:34:29 +00:00
родитель 6695b5e17a
Коммит a856f926de
8 изменённых файлов: 15 добавлений и 18 удалений
Показать статистику Скачать Patch файл Скачать Diff файл Показать все файлы Свернуть все файлы

1
ompi/message/message.h
Просмотреть файл

@ -61,6 +61,7 @@ ompi_message_alloc(void)
OPAL_FREE_LIST_GET(&ompi_message_free_list,
tmp,
rc);
(void)rc; /* prevent "set but not used" compiler complaints */
return (ompi_message_t*) tmp;
}

3
opal/class/opal_graph.c
Просмотреть файл

@ -278,7 +278,7 @@ void opal_graph_add_vertex(opal_graph_t *graph, opal_graph_vertex_t *vertex)
*/
int opal_graph_add_edge(opal_graph_t *graph, opal_graph_edge_t *edge)
{
opal_adjacency_list_t *aj_list, *start_aj_list= NULL, *end_aj_list;
opal_adjacency_list_t *aj_list, *start_aj_list= NULL;
opal_list_item_t *item;
bool start_found = false, end_found = false;
@ -296,7 +296,6 @@ int opal_graph_add_edge(opal_graph_t *graph, opal_graph_edge_t *edge)
}
if (aj_list->vertex == edge->end) {
end_found = true;
end_aj_list = aj_list;
}
}
/**

4
opal/datatype/opal_datatype_copy.c
Просмотреть файл

@ -3,7 +3,7 @@
* Copyright (c) 2004-2006 The Trustees of Indiana University and Indiana
* University Research and Technology
* Corporation. All rights reserved.
* Copyright (c) 2004-2012 The University of Tennessee and The University
* Copyright (c) 2004-2013 The University of Tennessee and The University
* of Tennessee Research Foundation. All rights
* reserved.
* Copyright (c) 2004-2006 High Performance Computing Center Stuttgart,
@ -101,7 +101,6 @@ int32_t opal_datatype_copy_content_same_ddt( const opal_datatype_t* datatype, in
char* destination_base, char* source_base )
{
OPAL_PTRDIFF_TYPE extent;
size_t iov_len_local;
int32_t (*fct)( const opal_datatype_t*, int32_t, char*, char*);
#if OPAL_CUDA_SUPPORT
@ -116,7 +115,6 @@ int32_t opal_datatype_copy_content_same_ddt( const opal_datatype_t* datatype, in
*/
if( 0 == count ) return 1;
iov_len_local = count * datatype->size;
/**
* see discussion in coll_basic_reduce.c for the computation of extent when
* count != 1. Short version of the story:

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

@ -2,7 +2,7 @@
* Copyright (c) 2004-2008 The Trustees of Indiana University and Indiana
* University Research and Technology
* Corporation. All rights reserved.
* Copyright (c) 2004-2012 The University of Tennessee and The University
* Copyright (c) 2004-2013 The University of Tennessee and The University
* of Tennessee Research Foundation. All rights
* reserved.
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
@ -356,7 +356,7 @@ static int open_components(const char *type_name, int output_id,
const mca_base_component_t *component;
mca_base_component_list_item_t *cli;
bool called_open;
bool opened, registered;
bool opened;
/* Announce */
@ -373,14 +373,13 @@ static int open_components(const char *type_name, int output_id,
cli = (mca_base_component_list_item_t *) item;
component = cli->cli_component;
registered = opened = called_open = false;
opened = called_open = false;
opal_output_verbose(10, output_id,
"mca: base: components_open: found loaded component %s",
component->mca_component_name);
/* Call the component's MCA parameter registration function */
if (NULL == component->mca_register_component_params) {
registered = true;
opal_output_verbose(10, output_id,
"mca: base: components_open: "
"component %s has no register function",
@ -388,7 +387,6 @@ static int open_components(const char *type_name, int output_id,
} else {
ret = component->mca_register_component_params();
if (OPAL_SUCCESS == ret) {
registered = true;
opal_output_verbose(10, output_id,
"mca: base: components_open: "
"component %s register function successful",

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

@ -182,6 +182,7 @@ int mca_base_param_recache_files(bool rel_path_search)
char *files, *new_files = NULL, *new_agg_files = NULL;
char * new_agg_path = NULL, *agg_default_path = NULL;
(void)id; /* prevent "set but not used" compiler complaints */
/* We may need this later */
home = (char*)opal_home_directory();

8
opal/mca/if/posix_ipv4/if_posix.c
Просмотреть файл

@ -1,6 +1,9 @@
/*
* Copyright (c) 2010 Cisco Systems, Inc. All rights reserved.
* Copyright (c) 2010 Oracle and/or its affiliates. All rights reserved.
* Copyright (c) 2013 The University of Tennessee and The University
* of Tennessee Research Foundation. All rights
* reserved.
* $COPYRIGHT$
*
* Additional copyrights may follow
@ -66,7 +69,7 @@ static int prefix (uint32_t netmask)
static int if_posix_open(void)
{
int sd;
int lastlen, num, rem;
int lastlen, rem;
char *ptr;
struct ifconf ifconf;
int ifc_len;
@ -153,8 +156,7 @@ static int if_posix_open(void)
*/
ptr = (char*) ifconf.ifc_req;
rem = ifconf.ifc_len;
num = 0;
/* loop through all interfaces */
while (rem > 0) {
struct ifreq* ifr = (struct ifreq*) ptr;

5
opal/util/cmd_line.c
Просмотреть файл

@ -2,7 +2,7 @@
* Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
* University Research and Technology
* Corporation. All rights reserved.
* Copyright (c) 2004-2006 The University of Tennessee and The University
* Copyright (c) 2004-2013 The University of Tennessee and The University
* of Tennessee Research Foundation. All rights
* reserved.
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
@ -240,7 +240,6 @@ int opal_cmd_line_parse(opal_cmd_line_t *cmd, bool ignore_unknown,
bool is_unknown_option;
bool is_unknown_token;
bool is_option;
bool has_unknowns;
char **shortsv;
int shortsc;
int num_args_used;
@ -279,7 +278,6 @@ int opal_cmd_line_parse(opal_cmd_line_t *cmd, bool ignore_unknown,
param = NULL;
option = NULL;
has_unknowns = false;
for (i = 1; i < cmd->lcl_argc; ) {
is_unknown_option = false;
is_unknown_token = false;
@ -470,7 +468,6 @@ int opal_cmd_line_parse(opal_cmd_line_t *cmd, bool ignore_unknown,
into the tail. If we're not ignoring unknowns, then print
an error and return. */
if (is_unknown_option || is_unknown_token) {
has_unknowns = true;
if (!ignore_unknown || is_unknown_option) {
fprintf(stderr, "%s: Error: unknown option \"%s\"\n",
cmd->lcl_argv[0], cmd->lcl_argv[i]);

3
opal/util/printf.c
Просмотреть файл

@ -2,7 +2,7 @@
* Copyright (c) 2004-2005 The Trustees of Indiana University and Indiana
* University Research and Technology
* Corporation. All rights reserved.
* Copyright (c) 2004-2012 The University of Tennessee and The University
* Copyright (c) 2004-2013 The University of Tennessee and The University
* of Tennessee Research Foundation. All rights
* reserved.
* Copyright (c) 2004-2005 High Performance Computing Center Stuttgart,
@ -60,6 +60,7 @@ static int guess_strlen(const char *fmt, va_list ap)
case 'c':
carg = va_arg(ap, int);
len += 1; /* let's suppose it's a printable char */
(void)carg; /* prevent compiler from complaining about set but not used variables */
break;
case 's':
sarg = va_arg(ap, char *);