diff --git a/ompi/mca/coll/basic/coll_basic_reduce.c b/ompi/mca/coll/basic/coll_basic_reduce.c
index 826dd4e0f3..69e32cc48e 100644
--- a/ompi/mca/coll/basic/coll_basic_reduce.c
+++ b/ompi/mca/coll/basic/coll_basic_reduce.c
@@ -529,13 +529,12 @@ mca_coll_basic_reduce_lin_inter(void *sbuf, void *rbuf, int count,
                                 int root, struct ompi_communicator_t *comm,
                                 mca_coll_base_module_t *module)
 {
-    int i, rank, err, size;
+    int i, err, size;
     ptrdiff_t true_lb, true_extent, lb, extent;
     char *free_buffer = NULL;
     char *pml_buffer = NULL;
 
     /* Initialize */
-    rank = ompi_comm_rank(comm);
     size = ompi_comm_remote_size(comm);
 
     if (MPI_PROC_NULL == root) {