[mpich2-commits] r7921 - mpich2/trunk/src/mpi/romio/mpi2-other/array

[robl at mcs.anl.gov]

Author: robl
Date: 2011-02-09 11:43:01 -0600 (Wed, 09 Feb 2011)
New Revision: 7921

Modified:
   mpich2/trunk/src/mpi/romio/mpi2-other/array/darray.c
   mpich2/trunk/src/mpi/romio/mpi2-other/array/subarray.c
Log:
from Michael Raymond <mraymond at sgi.com>: clean up unused variables 


Modified: mpich2/trunk/src/mpi/romio/mpi2-other/array/darray.c
===================================================================
--- mpich2/trunk/src/mpi/romio/mpi2-other/array/darray.c	2011-02-08 17:05:43 UTC (rev 7920)
+++ mpich2/trunk/src/mpi/romio/mpi2-other/array/darray.c	2011-02-09 17:43:01 UTC (rev 7921)
@@ -49,9 +49,8 @@
                            MPI_Datatype *newtype) 
 {
     int err, error_code;
-    MPI_Datatype type_old, type_new, types[3];
-    int procs, tmp_rank, i, tmp_size, blklens[3], *coords;
-    MPI_Aint *st_offsets, orig_extent, disps[3], size_with_aint;
+    int i;
+    MPI_Aint orig_extent, size_with_aint;
     MPI_Offset size_with_offset;
     static char myname[] = "MPI_TYPE_CREATE_DARRAY";
 

Modified: mpich2/trunk/src/mpi/romio/mpi2-other/array/subarray.c
===================================================================
--- mpich2/trunk/src/mpi/romio/mpi2-other/array/subarray.c	2011-02-08 17:05:43 UTC (rev 7920)
+++ mpich2/trunk/src/mpi/romio/mpi2-other/array/subarray.c	2011-02-09 17:43:01 UTC (rev 7921)
@@ -43,9 +43,8 @@
                              int order, MPI_Datatype oldtype, 
                              MPI_Datatype *newtype)
 {
-    MPI_Aint extent, disps[3], size, size_with_aint;
-    int i, blklens[3], err;
-    MPI_Datatype tmp1, tmp2, types[3];
+    MPI_Aint extent, size_with_aint;
+    int i, err, error_code;
     MPI_Offset size_with_offset;
 
     /* --BEGIN ERROR HANDLING-- */