Remove a warning about an unused variable.

This commit was SVN r8755.

opal/mca/base/mca_base_param.c

@@ -761,7 +761,7 @@ int mca_base_param_finalize(void)
 
 static int read_files(char *file_list)
 {
-    int i, index, count;
+    int i, count;
     char **files;
 
     /* Iterate through all the files passed in -- read them in reverse
@@ -774,8 +774,12 @@ static int read_files(char *file_list)
 #ifdef __WINDOWS__
     /* Windows use : as a delimiter between the drive name and the path
      * Hopefuly, the drive name is limitted to one letter, so we can parse
-     * the files array as merge all of them.
+     * the files array and merge all one letter char* with the next. I hope
+     * nobody plan to have a one letter path on UNIX.
      */
+    {
+        int index;
+
         for( index = i = 0; i < count; i++ ) {
             if( (1 == strlen(files[i])) && (isalpha(files[i][0])) ) {
                 int length = 4 + strlen(files[i+1]);
@@ -791,7 +795,8 @@ static int read_files(char *file_list)
             }
         }
         count = index;
-    files[index] = NULL;
+        files[index] = NULL;  /* force the final NULL */
+    }
 #endif
 
     for (i = count - 1; i >= 0; --i) {