Remove a bunch of unused variables.

This commit was SVN r28213.

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;
 }
 

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;
         }
     }
     /**

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:

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",

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();
     

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,7 +156,6 @@ static int if_posix_open(void)
      */
     ptr = (char*) ifconf.ifc_req;
     rem = ifconf.ifc_len;
-    num = 0;
 
     /* loop through all interfaces */
     while (rem > 0) {

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]);

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 *);